ИНФОРМАТИКА, 8 КЛАСС.

1. Дан условный оператор: if(a<12)theny:=aelsey:=a+7 .

Условием является

все ответы верные

y:=a+7

a<12

y:=a

2. Условный оператор: if(x>3)theny:=x+7elsey:=x−20 .

Выбери действие, которое будет выполняться в случае истинности условия:

y:=x−20

y:=x+7

x>3

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

1) program cislo;

var

a: integer;

begin

writeln('Введи число a');

readln(a);

if a > 0 then a:=a;

writeln(a);

end.

2) program cislo;

var

a: integer;

begin

writeln('Введи число a');

readln(a);

if a < 0 then a:=a+28;

writeln(a);

end.

3) program cislo;

var

a: integer;

begin

writeln('Введи число a');

readln(a);

if a > 0 then a:=a+28;

writeln(a);

end.

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

1) program zadaca;

var

a: integer;

begin

writeln('Введи число a');

readln(a);

if a > =0 then

if a=0 then a:=13 else a:=a+1

else a:=a-6;

end.

2) program zadaca;

var

a: integer;

begin

writeln('Введи число a');

readln(a);

if a > =0 then

if a=0 then a:=13 else a:=a+1

else a:=a-6;

writeln(a);

readln;

end.

3) program zadaca;

var

begin

writeln('Введи число a');

readln(a);

if a > =0 then

if a=0 then a:=13 else a:=a+1

else a:=a-6;

writeln(a);

readln;

end.

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

y=⎧⎩⎨⎪⎪0, еслиx≤0

x, если0 x2, если x>1.

Запусти программу и введи значение x=14.

Число выведенное на экран:

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

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

program ves;

const

A1='легкая категория';

A2='средняя категория';

var

b : integer;

begin

write('введите вес спортсмена

(?) = ');

readln(?)

);

if (?) < (?) then writeln(A1) else writeln(A2);

readln;

end.

Тома1111111рок    3   11.05.2020 20:05    11