Какая информация быть может организована в табличной форме Какие преимущества обеспечивает табличное представление информации
247
389
Ответы на вопрос:
Program ulitka; var sunnyday: array [1..30] of boolean; a, b, c, i: integer; begin writeln('a = '); readln(a); writeln('b = '); readln(b); b : = b * 100; randomize; for i : = 1 to 30 do begin if random(2) = 1 then sunnyday[i] : = true else sunnyday[i] : = false; end; for i : = 1 to 30 do begin if sunnyday[i] = true then begin a : = a + 2; if a > b then a : = b; end else begin a : = a - 1; if a < 0 then a : = 0; end; end; writeln('дни месяца были таковы: '); for i : = 1 to 30 do begin if sunnyday[i] = true then writeln(i, '. солнечный') else writeln(i, '. пасмурный') end; writeln('к концу 30 дня местоположение улитки равно ', a, ' см над землей'); readln; end.
Популярно: Информатика
-
nik86824.04.2020 06:32
-
samikby20.11.2022 01:13
-
Fargoo9919.02.2023 08:41
-
zhakenovagulnaz20.12.2021 19:45
-
котенок13414.10.2021 21:59
-
leanir14.07.2022 14:46
-
Хорошистка54119.12.2022 21:35
-
максик8407.05.2021 21:44
-
crushkarulit02.03.2021 11:31
-
SaraSmail11.08.2020 04:44