Ответы на вопрос:
Теории в интернете полно. 3) 3 раза 4) 5 5) until n> 6 6)program zadanie; uses crt; var n,k,i,s: integer; begin clrscr; writeln ('введите n='); readln (n); for i: =1 to n do begin s: =s+i*i; end; writeln('сумма квадратов=',s); end. 7)program zadanie2; uses crt; var n: integer; begin clrscr; writeln ('введите n='); readln (n); writeln('результат: ',(5+(n-1))*n); end.
Популярно: Информатика
-
omarova0617.05.2020 23:38
-
лунтик7323.05.2020 10:37
-
boginyanatasha04.07.2020 08:51
-
серый38616.09.2020 16:24
-
Natashhkka04.07.2021 05:39
-
Пушок77115.06.2022 12:21
-
anutka201811.03.2022 05:24
-
denchik8307.11.2022 06:58
-
vitcke126.07.2020 18:08
-
dmutallapova30.01.2023 20:23