Информатика, опубликовано 2018-08-22 22:26:10 by Гость
Заданы числа a и b.Если они положительные то найти их произведение а в остальных случаях найти их сумму.
Ответ оставил Гость
//PascalABC.NET (версия 3.1, сборка 1196 от 09.03.2016)
begin
var a:=ReadlnInteger(Введите число а);
var b:=ReadlnInteger(Введите число b);
if (a>0) and (b>0) then println(a,*,b,=,a*b)
else println(a,+,b,=,a+b)
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.