Предмет: Информатика,
автор: DendyR
Составить программу на языке Pascal, которая позволяет ввести два числа. Если оба числа положительные, то вычислить их сумму, иначе произведение.
Ответы
Автор ответа:
1
PascalABC.NET 3.3.5, сборка 1669 от 21.05.2018
Внимание! Если программа не работает, обновите версию!
begin
var (a,b):=ReadReal2('Введите через пробел два числа:');
If (a>0) and (b>0) then Writeln(a+b) else Writeln(a*b)
end.
Внимание! Если программа не работает, обновите версию!
begin
var (a,b):=ReadReal2('Введите через пробел два числа:');
If (a>0) and (b>0) then Writeln(a+b) else Writeln(a*b)
end.
DendyR:
Можете глянуть ещё эти две задачи?
Интересные вопросы
Предмет: География,
автор: Аноним
Предмет: Алгебра,
автор: bogdanziysenko
Предмет: Математика,
автор: KyCbKa
Предмет: Математика,
автор: alina745
Предмет: Литература,
автор: миникрипер