Дано целое число. если оно является положительным, то прибавь к нему 3. в противном случае не изменять его. вывести полученное число.
227
396
Ответы на вопрос:
var x:integer;
begin
readln(x);
if x>0 then x:=x+3;
writeln(x);
end.
Объяснение:
1. считать a и b 2. ввести переменные с и d 2. с = a*a 3. d = b*b 4. вывести c + d
Популярно: Информатика
-
провривррф22.06.2022 05:33
-
динара25921.07.2022 17:14
-
sonasandimirova19.04.2020 17:26
-
Obzzzi22.05.2022 18:04
-
kif130520.04.2022 07:45
-
dianasmertiyk08.08.2022 20:15
-
mani0909111.08.2020 02:27
-
Vano2205200018.02.2023 20:43
-
tim4ik11428.10.2022 18:28
-
Amina515521.02.2023 12:45