Написать программы через процедуры. 1. описать процедуру, которая возвращает среднее арифметическое значение нечетных цифр, входящих в запись числа типа longint. 2. использовать подпрограммы (ввода, вывода, обрабатывающей части). дан массив целых чисел а[m,n], где m,n< =10. удалить строку с номером к и столбец с номером l
118
136
Ответы на вопрос:
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.
Популярно: Информатика
-
zachar304.05.2023 13:34
-
Vakluver22.02.2022 11:00
-
VladaDubrovskaя29.05.2023 09:18
-
Аngel1119.05.2021 19:19
-
ойооы07.11.2022 07:13
-
irlukshina20.08.2022 00:02
-
nastorekhova2010.05.2020 10:36
-
roman2016volko14.04.2022 14:54
-
damirnikiforov15.03.2022 06:52
-
daryabatova01.09.2022 08:08