Ответы на вопрос:
Var
s, a, i: integer;
begins: =0;
write('a = ');
readln(a);for i : = 1 to a do
begins: =s+(2*i-1);
end;
writeln(s);
end.
Популярно: Информатика
-
тетрадках16.02.2023 21:41
-
ga7729.04.2023 16:13
-
rf2048111111ozt4z723.11.2020 15:57
-
anognev12.02.2021 06:18
-
Murad1111111107.03.2020 23:13
-
Selid09.08.2022 08:41
-
Пусик9509.08.2020 14:30
-
клубничка18816.08.2020 22:50
-
ProgramAkkaunt19.02.2023 12:00
-
роллы601.05.2020 16:14