Ответы на вопрос:
program p1;
var x,res: Integer;
begin
writeln('Введите x: ');
readln(x);
if x <= 0 then res := 2*x*x+1
else res := x - 3;
writeln('Результат: ',res);
end.
Объяснение:
Популярно: Информатика
-
bogdanlesja114.12.2022 13:32
-
анна221608.02.2022 16:34
-
ашме14.03.2022 11:11
-
Samal006.02.2023 10:54
-
dgutjhththgjtjth21.12.2020 18:39
-
ilias192431.05.2022 09:23
-
kirirllermakov07.08.2021 01:40
-
isaevavika30.07.2021 12:25
-
gimazova9904.11.2021 12:26
-
1Яблочко102.01.2022 04:05