В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
з1з1
з1з1
21.06.2022 00:56 •  Информатика

Составить программу для решения задачи в среде Visual Studio. Задача: Если бы рабочий выполнил план, то он получил бы S руб. он выполнил план на М%. Вывести сколько рублей получил рабочий.

Показать ответ
Ответ:
angel491
angel491
27.08.2020 17:06

Объяснение:

<---------------------------1--------------------------->

#include <iostream>

using namespace std;

int main() {

   int a;

   cin>>a;

   if ((a/100+(a%100)/10+a%10) % 2 == 0)

       cout << "YES";

   else

       cout << "NO";

   return 0;

}

<---------------------------2--------------------------->

#include <iostream>

using namespace std;

int main() {

   int a, b, c;

   cin >> a >> b >> c;

   if (a == b || a == c || c == b)

       cout << "YES";

   else

       cout << "NO";

   return 0;

}

<---------------------------3--------------------------->

#include <iostream>

using namespace std;

int main()

{

   int a, b;

   char sing;

   cin >> a >> sing >> b;

   switch (sing)

   {

   case '*':

       cout << a * b;

       break;

   case '/':

       cout << a / b;

       break;

   case '+':

       cout << a + b;

       break;

   case '-':

       cout << a - b;

       break;

   

   default:

       cout << "ERROR";

       break;

   }

   return 0;

}


1. Дано трехзначное число N. Напечатать «Yes», если сумма его цифр является четным числом, и «No», е
1. Дано трехзначное число N. Напечатать «Yes», если сумма его цифр является четным числом, и «No», е
1. Дано трехзначное число N. Напечатать «Yes», если сумма его цифр является четным числом, и «No», е
0,0(0 оценок)
Ответ:
Player57
Player57
29.08.2020 18:11

var

 n, k, s, sa: integer;

 

begin

 k := 0;

 s := 0;

 sa := 0;

 writeln('Введите последовательность, окончание ввода - число 0');

 repeat

   read(n);

   if (n mod 4 = 0) and (n mod 10 = 2) then s := s + n;

   if (n <> 0) and (n < 100) then inc(k);

   sa := sa + n

 until n = 0;

 readln;

 writeln('Сумма чисел, кратных 4 и заканчивающихся на 2, равна ', s);

 writeln('Количество чисел, не больших 100, равно ', k);

 writeln('Сумма последовательности равна ', sa);

 readln

end.

Объяснение:

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота