Нужна , люди ! 9 класс, напишите программу даны два числа, не равные друг другу. замените большее из них молулем суммы, а меньшее-разностью квадратов этих чисел.
290
492
Ответы на вопрос:
Program abc; var a,b,c: integer; begin writeln('введите два числа'); read(a,b); if a> b then begin c: =a; a: =abs(a+b); b: =a*a-b*b; end else if a< b then begin c: =b; b: =abs(a+b); a: =b*b-a*a; end; writeln(a,' ',b); end.
Популярно: Информатика
-
DashaKuhal18.05.2020 22:39
-
Эллада2002904.05.2021 06:29
-
8967019804505.09.2020 00:14
-
Vadim5555406.03.2020 11:11
-
NastyaBay271004.05.2023 01:44
-
Руслана46214.07.2020 08:21
-
КукуцапольОрегинал11.04.2022 22:50
-
Rom4ik110522.09.2020 13:51
-
туманкакан03.06.2020 11:47
-
KotyaFila17.12.2022 21:16