Регистрация
анна2265
18.04.2022 08:53
Информатика
Есть ответ 👍

Дана программа на языке Паскаль:
var a, b:integer;
begin
а:=0;
for b:=1 to 5 do a:=a+b;
writeln (a);
end.
Запишите, что будет напечатано в результате
работы этой программы.​

161
354
Посмотреть ответы 1

Ответы на вопрос:

Sem5000
Sem5000
4,4(67 оценок)

var a, b: integer; begin readln(a, b);

if(a > b) then writeln('саша старше маши')  else if(a < b) then writeln('саша младше маши')    else writeln('саша и маша ровесники'); end.

Популярно: Информатика