Определите, что будет напечатано в результате работы следующей программы.
var s, k: integer;
begin
s := 5;
for k := 1 to 6 do
s := s + 9 * k;
writeln(s);
end.
218
436
Ответы на вопрос:
Var m,d,h: integer; begin write('m = '); readln(m); d: =m div (24*60); h: =(m-d*24*60) div 60; writeln('day(s) = ',d,' hour(s) = ',h); end. пример: m = 3540day(s) = 2 hour(s) = 11
Популярно: Информатика
-
Доминат17.01.2023 21:26
-
ashotik00701.03.2020 21:09
-
yevdokimenkoal28.01.2020 16:34
-
yellowumbrella21.05.2020 03:04
-
DianaSims19.02.2023 02:02
-
Begzodik09.05.2022 08:15
-
wassilina10.12.2022 05:43
-
Dasha17010526.04.2023 16:26
-
pstepanova49625.05.2021 09:03
-
ТуристАртемий20.03.2020 21:33