Регистрация
yuliaatamanchuk
13.11.2022 14:46
Информатика
Есть ответ 👍

Ввести с клавиатуры n любых чисел. Найти сумму, количество, среднее арифметическое и произведение двузначных. python

202
234
Посмотреть ответы 1

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

rebecca332
rebecca332
4,7(96 оценок)

const

n=7;

var

a: array [1..n] of integer;

i,k,buf: integer;

begin

for i: =1 to n do begin

write ('a[',i,'] = '); readln(a[i]);

if a[i]=49 then k: =i;  

end;

writeln ('before: ');

for i: =1 to n do write(a[i],' ');

writeln;

writeln ('index: ',k):  

buf: =a[1];

a[1]: =a[k];

a[k]: =buf;

writeln ('after: ');

for i: =1 to n do write (a[i],' ');

readln;

end.

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