Задать вопрос
15 июня, 00:02

Дан массив из 10 элементов. Необходимо заполнить его первыми 10 членами арифметической прогрессии с заданными первым членом прогрессии a и её разностью p.

Формат входных данных

С клавиатуры вводятся целые числа a и p (-100≤a, p≤100-100≤a, p≤100).

Формат выходных данных

Требуется вывести содержимое массива после заполнения согласно условию задачи. Элементы должны разделяться пробелами.

+1
Ответы (1)
  1. 15 июня, 02:25
    0
    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
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Дан массив из 10 элементов. Необходимо заполнить его первыми 10 членами арифметической прогрессии с заданными первым членом прогрессии a и ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы