OniRitsu
03.07.2021 20:30

Голосование. пять студентов решают идти на первую пару или ещё поспать. пользователь вводит голоса каждого. 1 означает идти, 0 - поспать. программа выводит окончательное решение. оно принимается простым большинством.
нужно составить программу в pascal.​

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Никита20071910
10.10.2020 15:33

Var a, j, i:integer ;

Begin

j:=0;

For i:=1 to 5 do begin

Read(a) ;

If a=1 then j:=j+1;

If a=0 then j:=j-1;

End;

If j>0 then writeln('Ученики идут на пару')

Else Writeln('Ученики спят' );

End.

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