Ввести два числа. Если их сумма больше
100, то сумму уменьшить в 2 раза, в
противном случае увеличить в 2 раза.
244
447
Ответы на вопрос:
var a,b,c:real; begin writeln ('Введите числа'); readln (a,b); c:=a+b; if c>100 do c:=c/2 else c:=c*2; write (c) end.
Популярно: Информатика
-
cerenkovvladimi14.02.2020 04:18
-
АнгелТих25.09.2022 05:11
-
филин200816.02.2023 22:32
-
Nactyxa200321.10.2020 19:21
-
sergo19602.01.2023 14:38
-
4508714.06.2021 18:33
-
майя15501.01.2022 09:21
-
AleksaKiki21.04.2021 07:38
-
lenaglukhova2005.10.2021 00:18
-
sergei440402.11.2020 01:49