Регистрация
нур92
19.09.2021 22:09
Информатика
Есть ответ 👍

Для выполнения этого необходимо создать массив из n элементов (const n=10; ). строку "const n=10; " в окно тестирующей системы вставлять не нужно -- тестирующая система сделает это сама. требуется заполнить массив числами, равными их порядковому номеру. вывести полученный массив на экран.

215
470
Посмотреть ответы 2

Ответы на вопрос:

Mozgovoi1
Mozgovoi1
4,6(62 оценок)
Var a: array[1..n] of integer; i: integer; begin for i: =1 to n do a[i]: =i; for i: =1 to n do write(a[i],' '); writeln; end.
yiliamasegorova
yiliamasegorova
4,4(6 оценок)

program gwr;

var x,n,s,i : integer;

begin

s:= 1;

writeln('Введите число, которое нужно возвести в степень: ');

read(x);

writeln('Введите число n');

readln(n);

n := n - 152;

for i := 1 to n do

 s := s*x;

writeln(s);

end.

Популярно: Информатика