Ответы
Ответ дал:
1
Задание 8:
Var a,b:integer;
begin
write (‘ введите два числа ‘);
readln (a,b);
if a>b then writeln (a) else writeln (b);
end.
Var a,b:integer;
begin
write (‘ введите два числа ‘);
readln (a,b);
if a>b then writeln (a) else writeln (b);
end.
Вас заинтересует
1 год назад
1 год назад
1 год назад
1 год назад
3 года назад
3 года назад