Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
Maxiro
17.05.2022 23:34 •
Информатика
Задано фрагмент алгоритму. Скільки разів буде виконуватися команда тіла циклу? Відповідь введіть числом.
👇
Увидеть ответ
Открыть все ответы
Ответ:
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
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 оценок)
Это интересно:
О
Образование-и-коммуникации
09.06.2023
Как стать онлайн-корректором: советы и требования...
С
Стиль-и-уход-за-собой
06.12.2022
7 шагов к переходу от темных волос к светлым: все, что вы должны знать, чтобы изменить свой цвет волос...
07.06.2020
Как перестать сомневаться: 10 простых шагов...
П
Питомцы-и-животные
04.01.2023
Как растить котят: основные правила и советы...
М
Мир-работы
31.01.2020
Как собрать детскую кроватку: подробная инструкция...
С
Стиль-и-уход-за-собой
13.10.2021
Как изменить стиль исходя из вашего бюджета...
О
Образование-и-коммуникации
23.09.2021
Как построить гистограмму: подробное руководство...
К
Компьютеры-и-электроника
25.01.2020
Простой способ сохранить вложение на компьютер...
В
Взаимоотношения
21.11.2020
Страх перед длинными словами: как правильно произносить сложные термины?...
С
Семейная-жизнь
27.01.2022
Как подростку справиться с потерей отца: советы от психологов...
Новые ответы от MOGZ: Информатика
ttttt18
04.11.2021
Перевести 256 в десятичной степени в двоичную, восьмеличную, шеснадцатоличную, черыречную и семиричную....
mandarinkamare007
06.05.2023
Выполнить сложение в двоичной системе счисления: 11+1; 111+1; 1111+1; 11111+1...
dimas194
06.01.2022
Как представлено число 124 10 в двоичной системе счисления? ...
valwkebe
17.06.2021
Скорость передачи данных равна 140000 бит/с. файл какого объема будет передан за время 1 мин?...
Праемпт
17.06.2021
Найдите количество элементов двумерного массива a[1..5,1..5] равных 1. массив заполните случайными числами в диапазоне от -10 до 10. вывести массив на экран в виде таблицы и количество...
thedvoichnik
17.06.2021
1.какое расширение имеют файлы-программы: а).ini, .cpp б).txt, .doc в).exe, .com г).wmf, .dll 2.для создания базы данных следует выбрать команды: а)создать б)открыть в)печать г)новая...
bititi2
28.04.2023
Растровое изображение размером пикселя занимает 4 килобайта памяти. максимальное количество цветов, используемых в изображении, равно...
ЖекЖек
16.07.2020
Составить таблицы истинности для следующих логических выражений. F=(A→B)&(А̅∨B̅) с Решением...
dzorina2002
22.06.2022
Ограничение времени 1 секунда Ограничение памяти 64Mb Ввод стандартный ввод или input.txt Вывод стандартный вывод или output.txt Чтобы компьютер мог установить у себя точное время,...
rudypal12p08ufl
30.10.2022
перенесення тексту на жортский диск...
MOGZ ответил
20 /решите уравнение [х^3]+[х^2]+[х]={х}-1,где [х] и {х} -целая и дробная части...
Определите по суффиксу часть речи: likely, buyer, chamber, characteristic, devotion,...
Нужно составить последовательность *сбор информации *хранение информации *обработка...
Фирма «светоч» продает только два товара – свечи и подсвечники. в 2017 году прибыль...
2,5v=7,5v можете подсказать какой формулой здесь пользоватся?...
(лямбда)=800нм m-? e-? p-? заранее !...
Из перечисленных веществ выберите те растворы,в которых будет ph меньше 7: naoh,hcl,nahso4,nacl,koh,hno3...
Решите уравнение [x^3]+[x^2]+[x]={x}-1, где [x] и {x} целая дробная части числа....
Какую часть суток составляют 10 часов?...
Надо корень уравнения 1,3у= -3,12 1)-0,416,2)2,4,3)130/312,4)-2,4...
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ
Оформи подписку
О НАС
О нас
Блог
Условия пользования
Авторское право
Политика конфиденциальности
Предпочтения cookie-файлов
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
App
Вход
Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ
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;
}