Дан массив из 10 элементов. необходимо заполнить его - вопрос №60147321010 от daryna27 19.02.2022 21:23

Question

Информатика: Дан массив из 10 элементов. необходимо заполнить его первыми 10 членами арифметической прогрессии с заданными первым членом прогрессии a и её разностью p. формат входных данных с клавиатуры вводятся целые числа a и p (−100≤a,p≤100−100≤a,p≤100). формат выходных данных требуется вывести содержимое массива после заполнения согласно условию . элементы должны разделяться пробелами.

daryna27 · Answer

Const  n=10;var  m:array[1..n] of integer;  a,p,i:integer;begin  Write( Введите a,p: );  Read(a,p);  for i:=1 to n do  begin    m[i]:=a+p*(i-1);    Write(m[i], )  end;  Writeln;end.Тестовое решениеВведите a,p: -5 8-5 3 11 19 27 35 43 51 59 67...