1)Условный оператор: if(x>2)theny:=x+10elsey:=x−23.
Выбери действие, которое будет выполняться в случае истинности условия:

y:=x+10
x>2
y:=x−23
2)Дана программа на языке Паскаль.
Программа определения весовой категории в зависимости от веса спортсмена. Если вес спортсмена меньше 62, то «лёгкая категория» иначе «средняя категория». Заполните пустые окошки.

program ves;
const
A1='легкая категория';
A2='средняя категория';
var
s : integer;
begin
write('введите вес спортсмена
= ');
readln(
);
if
<
then writeln(A1) else writeln(A2);
readln;
end.
3)Дано целое число. Если оно является положительным, то прибавить к нему 20; в противном случае не изменять его. Вывести полученное число.

program cislo;
var
a: integer;
begin
writeln('Введи число a');
readln(a);
if a > 0 then a:=a;
writeln(a);
readln;
end.
program cislo;
var
a: integer;
begin
writeln('Введи число a');
readln(a);
if a < 0 then a:=a+20;
writeln(a);
readln;
end.
program cislo;
var
a: integer;
begin
writeln('Введи число a');
readln(a);
if a > 0 then a:=a+20;
writeln(a);
readln;
end.
4)Дано целое число. Если оно является положительным, то прибавить к нему 1; если отрицательным, то вычесть из него 7; если нулевым, то заменить его на 17. Вывести полученное число.

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-7;
writeln(a);
readln;
end.
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-7;
writeln(a);
readln;
end.
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-7;
end.
5)Запиши программу на языке Паскаль для: y=⎧⎩⎨⎪⎪0,еслиx≤0x,если01. (y:3:0)
Запусти программу и введи значение x=11.

Число выведенное на экран:
6)
Определить, принадлежит ли точка y отрезку [k;m].

var
k,m,y:real;
begin
write('
=');
readln(
);
write('m=');
readln(m);
write('y=');
readln(
);
if (y>=k) and (y<=
) then writeln ('yes') else writeln('no');
readln;
end.
7)Выведи на экран большее из двух данных чисел.
Запиши программу на языке Паскаль, выведи ответ на экран, если 1,42306 и 2,5931.

1.bmp
2.bmp
3.bmp

На экране

vvedi dva chisla
1,42306 2,5931
8)Дано целое число. Если оно является положительным, то прибавить к нему 59; в противном случае не изменять его. Вывести полученное число.

program cislo;
var
a: integer;
begin
writeln('Введи число a');
readln(a);
if a < 0 then a:=a+59;
writeln(a);
readln;
end.
program cislo;
var
a: integer;
begin
writeln('Введи число a');
readln(a);
if a > 0 then a:=a;
writeln(a);
readln;
end.
program cislo;
var
a: integer;
begin
writeln('Введи число a');
readln(a);
if a > 0 then a:=a+59;
writeln(a);
readln;
end.
9)Запиши программу на языке Паскаль для: y=⎧⎩⎨⎪⎪0,еслиx≤0x,если01. (y:3:0)
Запусти программу и введи значение

256

309

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

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

AlenkaPro1

Информатика

4,8(82 оценок)

123(5)=38(10)1101,1(2)=13,5(10) 23,2(8)=19,25(10)

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

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

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

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

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

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