Определите значение S на десятом шаге:
VAR X,S:INTEGER;
BEGIN
X:=2; S:=0;
WHILE X<=50 DO BEGIN
IF (X MOD 3)=0 AND (X MOD 2)=0 THEN S:=S+1;
X:=X+2;
END;
WRITE(S); END.
103
212
Ответы на вопрос:
102 байта
Объяснение:
Ну если в кодировке на 1 символ по 2 байта а всего символов 51 то умножаем 51 на 2 и всё
Популярно: Информатика
-
KaratisT22223.11.2022 19:54
-
kamilla19826.01.2021 02:07
-
weloyda04.10.2022 06:43
-
baryshnikova2023.04.2022 09:03
-
Strelkov1827.10.2021 06:40
-
doggster22.09.2020 22:02
-
zaper88613.09.2020 11:08
-
ustishca08.06.2020 10:16
-
nastyaetoi15.03.2020 19:38
-
наташа60822.04.2023 07:22