Посчитайте количество байт и бит в предложении: 1 гбайт = 1024 мбайт

Question

Информатика: Посчитайте количество байт и бит в предложении: 1 гбайт = 1024 мбайт

Irina12345678901 · Accepted Answer

Program question;

var
a: string;
b: integer;

begin
writeln('Сколько тебе лет?:');
readln(b);
if b > 17 then begin
writeln('В каком институте ты учишься?:');
readln(a);
writeln(a, ' хороший институт');
writeln('До следующей встречи!');
end
else
if b <= 17 then begin
writeln('В какой школе ты учишься?');
readln(a);
writeln(a, ' не плохая школа');
writeln('До следующей встречи!');
end;
end.

MOGZ ответил