УМОЛЯЮ, ПОМОГИТЕ! В таблице Dat представлены данные о количестве голосов, поданных за 10 исполнителей народных песен (Dat[1] – количество голосов, поданных за первого исполнителя, Dat[2] – за второго и т.д.). Определите, какое число будет напечатано в результате работы следующей программы.
var k, m: integer;
Dat: array [1..10] of integer;
begin
Dat[1]:=56; Dat[2]:=70;
Dat[3]:=20; Dat[4]:=41;
Dat[5]:=14; Dat[6]:=22;
Dat[7]:=30; Dat[8]:=12;
Dat[9]:=65; Dat[10]:=35;
m:=0;
for k:=1 to 10 do
if Dat [k]>25 then
begin
m:=m+1
end;
writeln (m);
end.
Please enter comments
Please enter your name.
Please enter the correct email address.
You must agree before submitting.

Answers & Comments


Copyright © 2024 SCHOLAR.TIPS - All rights reserved.