М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
anastasiaqw
anastasiaqw
17.09.2020 14:47 •  Информатика

7°. Складіть проект, у якому виконавець намалює відрізок завдовж- ки 50 кроків синім кольором, якщо натиснуто клавішу стрілка
вправо, або намалює відрізок завдовжки 100 кроків червоним
кольором, якщо натиснуто клавішу стрілка вниз. помагите ​


7°. Складіть проект, у якому виконавець намалює відрізок завдовж- ки 50 кроків синім кольором, якщо

👇
Ответ:
Anion20
Anion20
17.09.2020

У меня такая схема получилась.

Если клавиша не нажата, - ждем.

Если нажата, идем дальше

Если нажата "вправо", рисуем 50 синим, и конец.

Иначе идем дальше

Если нажата "вниз", рисуем 100 красным, и конец.

Иначе опять идем на ожидание

Объяснение:


7°. Складіть проект, у якому виконавець намалює відрізок завдовж- ки 50 кроків синім кольором, якщо
4,8(52 оценок)
Открыть все ответы
Ответ:
MashaLipitenko
MashaLipitenko
17.09.2020
Функция isSevenHere возвращает истину, если в числе есть семерка, и ложь - если ее нет. В цикле for перебираем все значения от 1 до K (число, введенное с клавиатуры), и выводим на экран только те, где есть семерка.

Код программы:

function isSevenHere(number : integer) : boolean;var digit : integer;begin  Result := true;  while (number > 0) do  begin        digit := number mod 10;    if (digit = 7) then            exit;    number := number div 10;  end;  Result := false;end;
var i,k :integer;begin  write('Введите k: ');  readln(k);
  for i := 1 to k do    if (isSevenHere(i) = true) then      write(i,' ');end.
Найти и вывести на экран все целые числа из промежутка от 1 до k, в десятичной записи которых есть ц
4,8(36 оценок)
Ответ:
R1ceWithM3at
R1ceWithM3at
17.09.2020

СИСТЕМА
жен., греч. план, порядок расположенья частей целого, предначертанное устройство, ход чего-либо, в последовательном, связном порядке. Солнечная система, солнечная вселенная. Ботаническая система Линея, распределенье, распорядок. Система ученья, воспитанья, порядок образ, род. Систематичное, -ческое ученье, стройное, порядочное, порядливое, последовательное, разумное, правильное, обдуманное, постепенное. Систематика жен. научное разъясненье систем. Систематик, изобретатель новой системы или охотник до строгих, последовательных порядков.

4,5(50 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ