Регистрация
Katya111zz3
12.08.2020 10:19
Информатика
Есть ответ 👍

С ИНФОРМАТИКОЙ! У МЕНЯ СОР! ПОДПИШУСЬ СДЕЛАЮ ЛУЧШИЙ ОТВЕТ ЗАДАНИЯ В ТЕЧЕНИИ 15 МИНУТ!​

222
275
Посмотреть ответы 2

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

РАДЖАБ555
РАДЖАБ555
4,5(5 оценок)

1 Строка заголовка

2 Инструменты

3 Выбранные цвета

4 Кисти и текстуры

растягивание поля? увеличение размера площади

luluik
luluik
4,6(27 оценок)

var

  c: integer;

begin

  c : = 10;

  while c < 100 do

  begin

      if ((c mod 10) mod 3 = 0) and (c mod 10 < > 0) then

          write(c, ' ');

      c : = c + 1;

  end;

  writeln;

end.

 

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