Підрахувати обсяг текстових даних у книзі 200 сторінок, на кожній сторінці 64 рядки по 32 символи у рядку (для кодування одного символу – використовують один байт)
174
272
Ответы на вопрос:
var x: integer;
function d15(x: integer) : boolean;
begin
if (x mod 15) = 0 then d15 : = true else d15 : = false;
end;
begin
for x : = 200 to 300 do if d15(x) then writeln(x);
end.
Популярно: Информатика
-
vanyakolesov124.06.2021 19:23
-
Zhansiya1506.04.2020 13:40
-
sashaaaa529.08.2021 08:02
-
макс303305.07.2021 03:28
-
nargis107720.06.2022 00:36
-
Margarita11mm22.07.2022 18:07
-
60715611.06.2021 05:12
-
ксения129104.04.2023 22:03
-
dinadaybert20.12.2020 17:52
-
bertain20.07.2020 11:58