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

Задано фрагмент алгоритму. Скільки разів буде виконуватися команда тіла циклу? Відповідь введіть числом.

👇
Открыть все ответы
Ответ:
Yury28
Yury28
17.05.2022
N1
var a, b: integer;

•​ begin

•​ readln(a, b);

•​ a := a mod 2;
b := b mod 2;
•​ if (b > 0) and (a > 0) then

•​ writeln ('четных чисел нет')

•​ else

•​ writeln ('четное число есть');
end.

N2

#include <iostream>

using namespace std;

int main()
{
  int a;
  cin >> a;
  if(a < 100 || a > 999) cout  << "Неверное число" << endl;
  else
  {
    int a1 = a/100;
    int a2 = (a/10)%10;
    int a3 = a%10;
    if(a1%2==a2%2==a3%2==0) cout << "Да" << endl;
    else cout << "Нет" << endl;
  }
  return 0;
}
4,7(97 оценок)
Ответ:
RomanPopov2005
RomanPopov2005
17.05.2022
Program colors;
Uses crt;

var color: integer;
label l1;

Begin clrscr;
      l1: write('Введите номер цвета color = ');
          readln(color);

          case color of 0: writeln('Черный');
                        1: writeln('Синий');
                        2: writeln('Зеленый');
                        3: writeln('Голубой');
                        4: writeln('Красный');
                        5: writeln('Фиолетовый');
                        6: writeln('Коричневый');
                        7: writeln('Светло-серый');
                        8: writeln('Темно-серый');
                        9: writeln('Ярко-синий');
                        10: writeln('Ярко-зеленый');
                        11: writeln('Ярко-голубой');
                        12: writeln('Розовый');
                        13: writeln('Малиноый');
                        14: writeln('Желтый');
                        15: writeln('Белый');

          else
          begin
               writeln('Непривильный номер цвета');
               writeln;
               goto l1;
          end;
          end;
      readln;
End.             
4,6(61 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ