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

Даны два угла в градусах, можно ли построить треугольник с такими углами, и если можно, то будет ли этот треугольник прямоугольный.
мне нужно написать задачу в

Показать ответ
Ответ:
sashabulaev21
sashabulaev21
18.02.2021 11:04

Netflix - американский стриминговый сервис, специализирующийся на показе мультфильмов, фильмов, и сериалов на основе потокового мультимедия. Netflix стремится изменить наш подход к просмотру киноиндустрии в целом.

С 2013 года Netflix производит собственные фильмы, сериалы и телепрограммы. В 2016 году компания выпустила 126 оригинальных сериалов и фильмов — больше, чем любой другой сетевой или кабельный канал. По состоянию на январь 2019 года у компании насчитывалось 139 миллионов подписчиков по всему миру, в том числе 58,49 млн в США.

P.s Если не трудно, поставь пять звезд, нажми " " и сделай лучшим ответом, я хочу получить уровень "отличник" )

0,0(0 оценок)
Ответ:
Снежана1995
Снежана1995
21.02.2023 05:04

var N, i, a, m:integer;

c:boolean;

begin

 writeln('Введите количество участников');

 readln(N);

 if ((N < 1) or (N >50))then begin

   writeln('Ошибка');

   exit;

 end;

 m := 0;

 c := false;

 for i:=1 to N do begin

   writeln('На сколько вопросов правильно ответил ',i,' участник:');

   readln(a);

   if ((a < 0) or (a > 20)) then begin

     writeln('Ошибка');

     exit;

   end;

   

   if (a = 0) then

     c := true;

   

   if (a > m) then

     m:= a;

 end;

 writeln('Количество вопросов, на которые ответил победитель правильно: ', m);

 if (c = false) then

   writeln('Есть ли участники, которые не ответили ни на один вопрос правильно: NO')

 else write('Есть ли участники, которые не ответили ни на один вопрос правильно: YES');

 

end.

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