Опубликовано 10.06.2017 по предмету Информатика от Гость >> <<

Написать программу разветвленного алгоритма. если x>5 тогда y=x+4 иначе y=x-10

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

Begin
var: x,y: integer;
Begin
Writeln(Vvedite x);
If x>5 then y=x+4 else y=x-10;
Writeln(y=,y);
Readln;
Readln;
End.