Паскаль. что выдает? var k, m: integer;
dat: array[1..10] of integer;
begin
dat[1] : = 4; dat[2] : = 5;
dat[3] : = 4; dat[4] : = 3;
dat[5] : = 2; dat[6] : = 3;
dat[7] : = 4; dat[8] : = 5;
dat[9] : = 5; dat[10] : = 3;
m : = 0;
for k : = 1 to 10 do
if dat[k] < 4 then
m : = m + dat[k] ;
writeln (m) ;
end.
238
247
Ответы на вопрос:
ответ: 11
объяснение:
дан массив. данная программа считает сумму тех элементов массива
которые меньше 4.
то есть:
dat[4]+dat[5] +dat[6] +dat[10]=3+2+3+3=11
Популярно: Информатика
-
mashazygmangovich01.08.2020 21:36
-
елена43012.05.2023 22:48
-
katyayatakozwmp516.08.2021 20:30
-
Монстрик78918.06.2023 19:07
-
rahmatullinanvar10.11.2021 23:18
-
Mocket01.08.2022 13:00
-
vfeukb59Pavek17.01.2021 05:08
-
KiraKen04.01.2021 07:56
-
sabah201707.06.2021 07:53
-
azerzhanovaa10.02.2022 19:32