В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Полина112006
Полина112006
28.10.2022 01:25 •  Информатика

Запиши фрагмент алгоритма на языке паскаля и определите значения целочисленных переменных x и y после выполнения фрагмента:​


Запиши фрагмент алгоритма на языке паскаля и определите значения целочисленных переменных x и y посл

Показать ответ
Ответ:
дженни34
дженни34
24.07.2020 20:49
1.
Переведем Кб в байты: 0, 25 Кб * 1024 =256 байт.
Т.к. текст занимает объем 256 байт, а каждый символ – 1 байт, то в тексте 256 символов.
ответ: 256 символов

2.
30*70*5 = 10500 символов в тексте на 5 страницах. Текст займет 10500 байт оперативной памяти.
ответ: 10500 байт

3.
32 * 64 = 2048байт = 2Кбайт - 1 страница
640 / 2 = 320 страниц
ответ: 320 страниц

4.·Unicode – стандарт, согласно которому отводится для кодировки одного символа 2 байта. (можно кодировать математические символы, русские, английские, греческие,  и даже китайские). C его можно закодировать не 256, а 65536 различных символов. Полная спецификация стандарта Unicode включает в себя все существующие, вымершие и искусственно созданные алфавиты мира, а также множество математических, музыкальных, химических и прочих символов

5. В качестве международного стандарта принята кодовая таблица ASCII (American Standard Code for Information Interchange), кодирующая первую половину символов с числовыми кодами от 0 до 127 (коды от 0 до 32 отведены не символам, а функциональным клавишам).
0,0(0 оценок)
Ответ:
динара1316
динара1316
06.04.2023 18:39
Uses crt;
const N=3;M=3;
      L=9;
var a:array [1..N,1..M] of real;
    b:array [1..L] of real;
    i,j,x,k:integer;
begin
     x:=1;
     for i:=1 to N do
         for j:=1 to M do
         begin
              read(a[i,j]);
              if a[i,j]>0 then
              begin
                   b[x]:=a[i,j];
                   x:=x+1;
              end;
         end;
     clrscr;
     for i:=1 to N do
         begin
         for j:=1 to M do
             write(a[i,j]:3:0);
         writeln;
         end;
     writeln;
     for k:=1 to x-1 do
         write(b[k],' ');
end.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота