Ответы на вопрос:
const n=20;
var a: array [1..n] of integer;
i,max,min,k: integer;
begin
min: =200;
max: =0;
write('исходный массив: ');
for i: =1 to n do
begin
a[i]: =random(201);
if (a[i]> 9) and (a[i]< 100) then k: =k+1;
if a[i] > max then max: =a[i];
if a[i] < min then min: =a[i];
write(a[i],' ')
end;
writeln;
writeln('количество двузначных элементов: ',k);
writeln('разность между максимальным и минимальным элементами: ',max-min);
end.
Популярно: Информатика
-
alexksyx14.04.2022 22:29
-
ynavuhlitska26.10.2021 13:53
-
vlad141928.12.2022 13:00
-
чек1424.03.2023 01:04
-
SuЯfeЯ13.02.2022 10:53
-
staseem3513.08.2022 19:33
-
homeLoL11.04.2023 15:30
-
crankbait10.10.2020 05:18
-
mazurok328.07.2020 02:43
-
Mabmbj30.08.2022 23:39