Информатика, вопрос задал Zorro252 , 7 лет назад

Срочно! Информатика 10 класс!Паскаль.
процедура получает на вход два числа:
a1 - первый элемент арифметической прогрессии
d - разница между элементами арифметической прогрессии.
Процедура должна распечатать четвёртый элемент этой арифметической прогрессии

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

Ответил marketersaler
0

var a1,d:longint;

procedure arif (a1,d:longint);

begin

  write(a1+3*d);

end;

begin

  read(a1,d);

  arif(a1,d);

end.

Ответил Zorro252
0
надо с процедурой
Новые вопросы