Объясните пожалуйста КАК РЕШАТЬ. Что будет записано в результате работы данной программы? var
5-9 класс
|
Dat: array[1..7] of integer;
k, day: integer;
begin
Dat[1] := 9; Dat[2] := 11;
Dat[3] := 10; Dat[4] := 13;
Dat[5] := 8; Dat[6] := 5;
Dat[7] := 11;
day := 0;
for k := 1 to 7 do begin
if Dat[k] <=10 then
day := day+1;
end;
writeln(day);
end.
Другие вопросы из категории
и составляют b руб(в месяц).Рост цен ежемесячно увеличивает расходы на 3%,составьте программу расчета необходимой суммы денег,которую нужно единовременно попросить у родителей,чтобы можно было прожить 10 месяцев,используя эти деньги.
1.Составить функцию и процедуру, которая определяет сумму всех чисел от 1 до N.
Читайте также
begin
s:=1;
for n:=3 to 8 do
s:=s*2;
write(s);
end.
Python
b = 15
c = 0
while b != 3:
c=c+b
b=b-3
print(c)
Var m, n : integer;
begin
m := 50;
for n := 1 to 7 do
m := m – 7;
write(m);
end.
Определите, что будет напечатано в результате работы следующей программы.Алгоритмический язык