Найти все двузначные числа, кратные 3. Паскаль. Через repeat, until

Ответы:

Злата Гухман

23-04-2014 01:23

var a, i: integer;begina:=0;i:=10;repeatif ((i mod 3) = 0) thena:=a+1;i:=i+1;until i = 100;writeln(a);end.

Также наши пользователи интересуются:

Картинка с текстом вопроса от пользователя Лейла Катаева

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Найти все двузначные числа, кратные 3. Паскаль. Через repeat, until» от пользователя Лейла Катаева в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!