1)даны два числа а и в на 10 . выбрать большее из них и удвоить . 2)увеличить число а на 10 , если оно положительное , в другом случае уменьшить .
226
442
Ответы на вопрос:
1) var a,b: integer; begin readln(a,b); if a> b then writeln(a*2); if b> a then writeln(b*2); end. 2) var a: integer; begin readln(a); if a> 0 then writeln(a+10); if a< 0 then writeln(a-10); end. надеюсь на лучший ответ
Pascalabc.net, например: uses graphabc; begin rectangle(100, 100, 300, 200); end.
Популярно: Информатика
-
lizniki8202.03.2022 15:37
-
adyoulan23.03.2023 06:59
-
Minasyan9922.04.2020 10:51
-
amina34012.11.2021 08:51
-
ВикаKull25.02.2020 10:11
-
kozinasofia200615.03.2021 03:50
-
AnonimkaNya23.09.2022 03:14
-
Alinaschool200317.01.2023 16:16
-
Usoll16.08.2021 20:06
-
Alma8825.03.2020 09:44