Есть ответ 👍

1. Является ли условным оператором следующая последовательность символов?

if x
1. является;
2. не является.

2. Дан условный оператор: if (a<12) then y:=a else y:=a+7.
Условием является
1. y:=a+7
2. a<12
3. y:=a
4. все ответы верные

3. Условный оператор: if (x>1) then y:=x+6 else y:=x−28.
Выбери действие, которое будет выполняться в случае истинности условия:

1. y:=x+6
2. x>1
3. y:=x−28

4. Дана программа на языке Паскаль.

Программа определения весовой категории в зависимости от веса спортсмена. Если вес спортсмена меньше 67, то «лёгкая категория» иначе «средняя категория». Заполните пустые окошки.

program ves;
const
A1='легкая категория';
A2='средняя категория';
var
v : integer;
begin
write ('введите вес спортсмена = ');
readln ();
if < then writeln(A1) else writeln(A2);
readln;
end.

5. Дано целое число. Если оно является положительным, то прибавить к нему 1; если отрицательным, то вычесть из него 5; если нулевым, то заменить его на 17. Вывести полученное число.
Какая из программ соответствует задаче.

1. program zadaca;
var
a: integer;
begin
writeln('Введи число a');
readln(a);
if a > =0 then
if a=0 then a:=17 else a:=a+1
else a:=a-5;
end.
2. program zadaca;
var
begin
writeln('Введи число a');
readln(a);
if a > =0 then
if a=0 then a:=17 else a:=a+1
else a:=a-5;
writeln(a);
readln;
end.

3. program zadaca;
var
a: integer;
begin
writeln('Введи число a');
readln(a);
if a > =0 then
if a=0 then a:=17 else a:=a+1
else a:=a-5;
writeln(a);
readln;
end.

6. Запиши программу на языке Паскаль для:

Какое значение будет выведено при x=9.

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

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


ответ 1:

Program zadacha;

var

i,n:integer;

begin

 writeln ('Введите число: '); readln(n);

for i:=1 to n do  write(n-i+1);

end.

ответ 2:

Program zadacha;

var

i,a,b:integer;

begin

 writeln ('Введите A: '); readln(a);

 writeln ('Введите B: '); readln(b);

for i:=a to b do

 if (i mod 2 <> 0) then writeln(i);

end.

ответ 3:

Program zadacha;

var

i,a,b,sum:integer;

begin

 writeln ('Введите A: '); readln(a);

 writeln ('Введите B: '); readln(b);

for i:=a to b do

 if (i mod 10 = 7) then begin sum:=sum+i; end;  

 writeln('Результат: ',sum);

end.

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

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

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

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

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

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

Подпишись на наш телеграмм канал

GTP TOP NEWS