swdw1

16.05.2020 15:47 •  Информатика

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

ifx>15theny:=x+15elsey:=x−15

является
не является
2.Дан условный оператор: if(a<18)theny:=aelsey:=a+3.
Условием является

y:=a+3
все ответы верные
a<18
y:=a
3.Условный оператор: if(x>1)theny:=x+9elsey:=x−22.
Выбери действие, которое будет выполняться в случае истинности условия:

y:=x+9
x>1
y:=x−22
4.Дана программа на языке Паскаль.
Программа определения весовой категории в зависимости от веса спортсмена. Если вес спортсмена меньше 56, то «лёгкая категория» иначе «средняя категория». Заполните пустые окошки.

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

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

program zadaca;
var
begin
writeln('Введи число a');
readln(a);
if a > =0 then
if a=0 then a:=16 else a:=a+1
else a:=a-4;
writeln(a);
readln;
end.
program zadaca;
var
a: integer;
begin
writeln('Введи число a');
readln(a);
if a > =0 then
if a=0 then a:=16 else a:=a+1
else a:=a-4;
writeln(a);
readln;
end.
program zadaca;
var
a: integer;
begin
writeln('Введи число a');
readln(a);
if a > =0 then
if a=0 then a:=16 else a:=a+1
else a:=a-4;
end.
7.Запиши программу на языке Паскаль для: y=0,если x≤0x,если 0 1. (y:3:0)
Запусти программу и введи значение x=11.

Число выведенное на экран:
8.
9.Чему будет равно значение переменной а после выполнения фрагмента программы?

a:=10;

if a mod 2<>0 then a:=0

else a:=1;

1
10
0
5
10.Чему будет равно значение переменной b при a:= - 5?

if abs(a)>=5

then b:=a * 3

else b:= a * 2