1 байт = 8 бит
1 килобайт = 1024 байт
Следовательно: 1 килобайт = 8192 бит
Program test;
var
a:array[1..5] of integer;
i:byte;
begin
for i:=1 to 5 do
Readln(a[i]);
Write('Получившийся массив:');
for i:=1 to 5 do
Write(' ',a[i])
end.
var
i: Integer;
name, surname: String;
begin
writeln('Введите имя');
readln(name);
writeln('Введите фамилию');
readln(surname);
for i := 1 to 10 do
writeln(name,' ', surname);
end.
утка плавает от берега,
вода стоит в колодце
тигра в клетку не поймать тигры бывают только в полоску
Составляем и заполняем таблицу
a b c c<15?
3 25 1 да
3 25 2 да
3 28 3 да
3 31 4 да
3 34 5 да
3 37 6 да
3 40 7 да
3 43 8 да
3 47 9 да
3 50 10 да
3 53 11 да
3 57 12 да
3 60 13 да
3 63 14 да
3 67 15 нет
конец работы.
Смотрим, что у нас в ячейке b и даем ответ
Ответ: 67