Есть ответ 👍

Написать программы через процедуры. 1. описать процедуру, которая возвращает среднее арифметическое значение нечетных цифр, входящих в запись числа типа longint. 2. использовать подпрограммы (ввода, вывода, обрабатывающей части). дан массив целых чисел а[m,n], где m,n< =10. удалить строку с номером к и столбец с номером l

118
136
Посмотреть ответы 1

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


var a,p: real;

i,n: integer;

begin

  read(a,n);

  p: =1;

  for i: = 0 to n-1 do

    p: =p*(a+i);

  writeln(p);

end.

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