Есть ответ 👍

Определите значение 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
Посмотреть ответы 1

Ответы на вопрос:

AlviaSil
4,4(78 оценок)

102 байта

Объяснение:

Ну если в кодировке на 1 символ по 2 байта а всего символов 51 то умножаем 51 на 2 и всё

Популярно: Информатика