Ответы на вопрос:
у него будет плохая осанка так как он не ровно сидит
1 будет болеть шея
2 не правильно сидит будет болеть спина
3 ноги должны не просто лежать а как бы стоять
// дан массив q(15) , заполненный числами [0,100].найдите количество чётных чисел и их сумму var q : array [1..15] of byte; i,n : byte; s : word; begin randomize; for i: =1 to 15 do begin q[i]: =random(101); //заполняем массив случайными числами end; for i: =1 to 15 do begin if (q[i]mod 2=0) then //определяем четные чиcла begin n: =n+1; //высчитываем их количество s: =s+q[i]; //и сумму end; end; writeln ('в данном массиве ',n,' четных чисел. их сумма равна ',s) end.первый и второй циклы можно объединить (я так делал для наглядности)
Популярно: Информатика
-
Tema22832815.08.2022 06:26
-
ndknmm25.08.2020 12:34
-
ира102901.02.2022 13:15
-
Neу413.11.2020 06:12
-
6епррг20.11.2022 00:30
-
belovaan80p073pt18.04.2021 01:10
-
Pustynya15.09.2021 07:00
-
julianna1930.07.2020 16:55
-
Lyrryface10.01.2021 15:39
-
школаБийск29.08.2022 14:58