1. Исправьте ошибки в записи оператора ветвления
If x:= 5 then y:=y*x; writeln(‘y равен , y’); else y:=0;

_______________________________________________
2.Чему равно значение переменной Y после выполнения фрагмента программы
A:=5; B:=14;
if A>B then Y:=A div B else Y:=B div A;

3.Какое значение будет иметь переменная z после выполнения операторов:
z:=0;
if x>0 then
if y>0 then z:=1 else z:=2; если x=1 и y=-1? _

4. На вход программе подается три числа. Определите, превышает ли среднее арифметическое этих чисел 10. Вывести соответствующее сообщение.

166

500

Посмотреть ответы 1

Ответы на вопрос:

УРВ05052001

Информатика

4,7(84 оценок)

// PascalABC.NET

begin

ReadSeqIntegerWhile(p -> p <> 0)

.Where(p -> (p mod 6 = 0) and (p mod 10 = 4))

.Sum

.Print

end.

Задай свой вопрос

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.