Предмет: Информатика,
автор: lobanovasonia
даны числа х,у если х меньше у, то вычислить z=x+y, а если нет, то вычислить z= у+х-3 в обоих случаях вывести на экран содержимое ячеек x,y,z
Ответы
Автор ответа:
0
var
x,y,z:Integer;
Begin
Read(x,y);
if (x<y) then z:=x+y
else z:=y+x-3;
Writeln(x,' ',y,' ',z);
end.
x,y,z:Integer;
Begin
Read(x,y);
if (x<y) then z:=x+y
else z:=y+x-3;
Writeln(x,' ',y,' ',z);
end.
Похожие вопросы
Предмет: Қазақ тiлi,
автор: dulalvdoy
Предмет: Геометрия,
автор: Аноним
Предмет: Английский язык,
автор: Аноним
Предмет: Математика,
автор: m2a8
Предмет: Математика,
автор: Macha25082003