Информатика, опубликовано 2018-08-22 22:45:56 by Гость

15 баллов!Нужно составить программу в Паскаль. Если сумма различных целых чисел х, у, z меньше 30, то заменить меньшее из у и х суммой двух других. В противном случае увеличить все числа на 10

Ответ оставил Гость

Var x,y,z:integer;
begin
write(x=); readln(x);
write(y=); readln(y);
write(z=); readln(z);
if x+y+x  then  if x  else begin x:=x+10; y:=y+10; z:=z+10 end;
writeln(x=,x,  y=,y,  z=,z);
end.

Пример:
x=7
y=12
z=9
x=19  y=12  z=9

Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.

Форма вопроса доступна на полной версии этой страницы.