Хелппппппппппп
По какому правилу сформирован следующий массив?
-1 4 –9 16 -25 36 -49 64 -81 100
208
427
Ответы на вопрос:
1)
var
i,n: integer;
begin
readln(n);
for i: =1 to n do writeln(i*i);
end.
2)
var
i,n: integer;
begin
readln(n);
for i: =1 to 10 do writeln(i: 2,'*',n,'=',i*n: 3);
end.
3)
var i,n: integer; p: real;
begin readln(n); p : = 1; for i : = 1 to n do p : = p * i; writeln(p: 15: 0); end.
4)
var
i,n: integer;
begin
readln(n);
for i: =1 to n do if (i mod 2=0) then writeln(i);
end.
5)
var
i,n,k: integer;
begin
readln(n);
k: =0;
for i: =1 to n do if (i mod 15=0) then k: =k+1;
writeln(k);
end.
Популярно: Информатика
-
КундызДиас14.10.2021 19:22
-
жироввадим21.12.2021 12:07
-
hitrovskiy0122.02.2020 17:30
-
123123122131222325.03.2023 07:50
-
анастатья25.02.2023 21:11
-
УЕД20.04.2021 06:27
-
thecrazynon109815.03.2022 18:21
-
mareta34015.06.2022 03:58
-
Enigma126724.06.2020 02:33
-
asdfghjkl10714.06.2022 05:28