Срочно! Информатика 10 класс!Паскаль.
процедура получает на вход два числа:
a1 - первый элемент арифметической прогрессии
d - разница между элементами арифметической прогрессии.
Процедура должна распечатать четвёртый элемент этой арифметической прогрессии
процедура получает на вход два числа:
a1 - первый элемент арифметической прогрессии
d - разница между элементами арифметической прогрессии.
Процедура должна распечатать четвёртый элемент этой арифметической прогрессии
More Questions From This User See All
Answers & Comments
var a1,d:longint;
procedure arif (a1,d:longint);
begin
write(a1+3*d);
end;
begin
read(a1,d);
arif(a1,d);
end.