Предмет: Информатика,
автор: Den1409
Напишите на языке паскаль программу вычисления по формуле (на фото):
Приложения:
![](https://files.topotvet.com/i/ed2/ed2331b8cd11e631039ab5ee40e6e4d2.png)
Ответы
Автор ответа:
0
var x,y:integer;
begin
write('Введите "x" и "y": ');
read(x,y);
y:=y-x;
x:=x-2;
while x<=y do
begin
y:=y-x;
x:=x-2;
end;
write('Программа закончилась. x=',x,',y=',y);
end.
Похожие вопросы
Предмет: Математика,
автор: aldiyar01072011
Предмет: Математика,
автор: top4ikponchik13
Предмет: Биология,
автор: salovalentina441
Предмет: Математика,
автор: artek1
Предмет: Геометрия,
автор: nikotin1