Предмет: Информатика,
автор: изабелла123456789
выполните алгоритм для заданных чисел начало ввод x y x=y да нет вывод x x больше y да нет x=x-y y=y-x стрелка вверх к вводу
Ответы
Автор ответа:
0
что то типо такого??? напишите пожалуйста нормально или фото.
var x,y:integer;
begin cls;
read(x,y);
if x = y then
write(x)
else if x > y then x:=x-y else y:=y-x;
readln;
end.
Интересные вопросы
Предмет: География,
автор: bmahmudov321
Предмет: Математика,
автор: dilnozadauletalieva
Предмет: Биология,
автор: vr2222
Предмет: Физика,
автор: Alex199611
Предмет: Химия,
автор: cheklova