Предмет: Информатика,
автор: khramtsova99
Даны два числа. Вывести большее из них.
Ответы
Автор ответа:
0
ну это уже смешно)
var
a,b : integer;
begin
readln(a);
readln(b);
if a > b then writeln(a)
else writeln(b);
end.
var
a,b : integer;
begin
readln(a);
readln(b);
if a > b then writeln(a)
else writeln(b);
end.
Автор ответа:
0
Даны три целых числа. Найти количество положительных и количество отрицательных чисел в исходном наборе.
Похожие вопросы
Предмет: Английский язык,
автор: alenushka985
Предмет: Қазақ тiлi,
автор: Аноним
Предмет: Математика,
автор: ulankyzyajzana
Предмет: Химия,
автор: Каринка005
Предмет: Литература,
автор: Vasuliya