Итоговые задания по теме Линейные программы. Подпрограммы

1
Написать заголовок программы (раздел описания переменных) языком Паскаль, в котором используются переменные типа Integer: a, b, c.
Определить, какие из переменных (см. фрагмент программы) могут принимать значение 5.
Var a, b, w: integer;
Sum: real;
x: char;
n, z: string;
Чему равно значение переменной х после выполнения операций присваивания х:=5; х:=х+1;?
Выполните программу для предложенных исходных данных: a=1, b=2, c=3.
program z1;
uses crt;
var a,b,c: integer; s: real;
begin
write (a=’); readln (a);
write (b=’); readln (b);
write (c=’); readln (c);
s:= (a+b+c)/3;
writeln (s=’, s:1:0);
readkey
end.
Составить программу. В одном аквариуме а рыбок, а в другом на с рыбок больше. Сколько рыбок в двух аквариумах?
Составить программу. Найти значение выражения: u=f(a,b)-2f(1,2a-b), где 13 EMBED Equation.3 1415.


Вариант № 2
Написать заголовок программы (раздел описания переменных) языком Паскаль, в котором используются переменные типа Real: k, l, m.
Определить, какие из переменных (см. фрагмент программы) могут принимать значение 2.5.
Var a, b, w: integer;
Sum: real;
x: char;
n, z: string;
Чему равно значение переменной х после выполнения операций присваивания х:=6; х:=х-1;?
Выполните программу для предложенных исходных данных: a=2, b=3, c=6.
program z1;
uses crt;
var a,b,c: real; s: real;
begin
write (a=’); readln (a);
write (b=’); readln (b);
write (c=’); readln (c);
s:= (a+b-c)/3;
writeln (s=’, s:1:0);
readkey
end.
Составить программу. В одном доме d квартир, а в другом в n раз меньше. Сколько квартир в двух домах вместе?
Составить программу. Найти значение выражения: u=f(-a,b)-1.6f(b,a+b), где 13 EMBED Equation.3 1415.


Вариант № 3
Написать заголовок программы (раздел описания переменных) языком Паскаль, в котором используются переменные типа String: n, p, q.
Определить, какие из переменных (см. фрагмент программы) могут принимать значение -13.5.
Var a, b, w: integer;
Sum: real;
x: char;
n, z: string;
Чему равно значение переменной х после выполнения операций присваивания х:=5; х:=2*х-1;?
Выполните программу для предложенных исходных данных: a=-5, b=6, c=3.
program z1;
uses crt;
var a,b,c: integer; s: real;
begin
write (a=’); readln (a);
write (b=’); readln (b);
write (c=’); readln (c);
s:= (a+b-c)/3;
writeln (s=’, s:1:0);
readkey
end.
Составить программу. На одной полке m книг, а на другой на t книг больше. Сколько книг на двух полках вместе?
Составить программу. Найти значение выражения: u=15f(5,2b)+f(a,a-b), где 13 EMBED Equation.3 1415.


Вариант № 4
Написать заголовок программы (раздел описания переменных) языком Паскаль, в котором используются переменные типа boolean: s, t, r.
Определить, какие из переменных (см. фрагмент программы) могут принимать значение 254.5.
Var a, b, w: integer;
Sum: real;
x: char;
n, z: string;
Чему равно значение переменной х после выполнения операций присваивания х:=-2; х:=2/х+1;?
Выполните программу для предложенных исходных данных: a=5, b=6, c=-5.
program z1;
uses crt;
var a,b,c: integer; s: real;
begin
write (a=’); readln (a);
write (b=’); readln (b);
write (c=’); readln (c);
s:= (a+b+c)/3;
writeln (s=’, s:1:0);
readkey
end.
Составить программу. В магазин привезли x ящиков с ананасами, а ящиков с бананами на y штук меньше. Сколько ящиков экзотических фруктов привезли в магазин?
Составить программу. Найти значение выражения: u=2/f(-a,5)*f(a,a+6b), где 13 EMBED Equation.3 1415.

Вариант № 5
Написать заголовок программы (раздел описания переменных) языком Паскаль, в котором используются переменные типа char: d, f, g.
Определить, какие из переменных (см. фрагмент программы) могут принимать значение 11.
Var a, b, w: integer;
Sum: real;
x: char;
n, z: string;
Чему равно значение переменной х после выполнения операций присваивания х:=2; х:=х/4;?
Выполните программу для предложенных исходных данных: a=-5, b=-2, c=3.
program z1;
uses crt;
var a,b,c: integer; s: real;
begin
write (a=’); readln (a);
write (b=’); readln (b);
write (c=’); readln (c);
s:= (a-b+c)/3;
writeln (s=’, s:1:0);
readkey
end.
Составить программу. На автобусной остановке ждали автобус d взрослых пассажиров, а детей на f меньше. Сколько людей ждали автобус?
Составить программу. Найти значение выражения: u=5*f(a,-2b)*f(a,b), где 13 EMBED Equation.3 1415.


Вариант № 6
Написать заголовок программы (раздел описания переменных) языком Пас
·каль, в котором используются переменные типа Integer: x, y, z.
Определить, какие из переменных (см. фрагмент программы) могут принимать значение семь’.
Var a, b, w: integer;
Sum: real;
x: boolean;
n, z: string;
Чему равно значение переменной х после выполнения операций присваивания х:=5; х:=3х/15;?
Выполните программу для предложенных исходных данных: a=1, b=2, c=-3.
program z1;
uses crt;
var a,b,c: integer; s: real;
begin
write (a=’); readln (a);
write (b=’); readln (b);
write (c=’); readln (c);
s:= (a*b+c)/3;
writeln (s=’, s:1:0);
readkey
end.
Составить программу. В зоопарке g клеток с медведями. Это на h штук меньше, чем клеток с остальными хищниками. Сколько в зоопарке всего клеток с хищниками?
Составить программу. Найти значение выражения: u=8/f(a,b)-f(-2а,a-b), где 13 EMBED Equation.3 1415.

Вариант № 7
Написать заголовок программы (раздел описания переменных) языком Паскаль, в котором используются переменные типа real: k, d, f.
Определить, какие из переменных (см. фрагмент программы) могут принимать значение минус двадцать пять’.
Var a, b, w: integer;
Sum: real;
x: boolean;
n, z: string;
Чему равно значение переменной х после выполнения операций присваивания х:=5; х:=х-4;?
Выполните программу для предложенных исходных данных: a=5, b=2, c=3.
program z1;
uses crt;
var a,b,c: integer; s: real;
begin
write (a=’); readln (a);
write (b=’); readln (b);
write (c=’); readln (c);
s:= (a+b*c)/5;
writeln (s=’, s:1:0);
readkey
end.
Составить программу. В трамвае ехало 7 пассажиров. На остановке k пассажиров вышло, а l зашли в трамвай. Сколько пассажиров ехало в трамвае дальше?
Составить программу. Найти значение выражения: u=f(a,b)+f(в,a), где 13 EMBED Equation.3 1415.
Вариант № 8
Написать заголовок программы (раздел описания переменных) языком Паскаль, в котором используются переменные типа string: s, m, t.
Определить, какие из переменных (см. фрагмент программы) могут принимать значение 2.5.
Var a, b, w: integer;
Sum: real;
x: boolean;
n, z: string;
Чему равно значение переменной х после выполнения операций присваивания х:=5-2; х:=х+1;?
Выполните программу для предложенных исходных данных: a=1, b=2, c=5.5.
program z1;
uses crt;
var a,b,c,s: real;
begin
write (a=’); readln (a);
write (b=’); readln (b);
write (c=’); readln (c);
s:= (a/b+c)/3;
writeln (s=’, s:1:0);
readkey
end.
Составить программу. В таксопарке m автомашин находится в нерабочем состоянии, что в n раз меньше, чем автомашин, которые могут выйти на линию. Сколько всего автомашин в автопарке?
Составить программу. Найти значение выражения: u=f(b,a)+0.5f(a,b), где 13 EMBED Equation.3 1415.

Вариант № 9
Написать заголовок программы (раздел описания переменных) языком Паскаль, в котором используются переменные типа char: i, j, k.
Определить, какие из переменных (см. фрагмент программы) могут принимать значение 234’.
Var a, b, w: integer;
Sum: real;
x: boolean;
n, z: string;
Чему равно значение переменной х после выполнения операций присваивания х:=5; х:=2*х;?
Выполните программу для предложенных исходных данных: a=1, b=2, c=3.
program z1;
uses crt;
var a,b,c: integer; s: real;
begin
write (a=’); readln (a);
write (b=’); readln (b);
write (c=’); readln (c);
s:= (a*b*c)/3;
writeln (s=’, s:1:0);
readkey
end.
Составить программу. В одной роте p солдат, а в двух вместе q солдат. На сколько солдат во второй роте больше, чем в первой?
Составить программу. Найти значение выражения: u=f(a,b)-f(-a,-b), где 13 EMBED Equation.3 1415.


Вариант № 10
Написать заголовок программы (раздел описания переменных) языком Паскаль, в котором используются переменные типа boolean: a, x, n.
Определить, какие из переменных (см. фрагмент программы) могут принимать значение ’23.9’.
Var a, b, w: integer;
Sum: real;
x: boolean;
n, z: string;
Чему равно значение переменной х после выполнения операций присваивания х:=15; х:=х/5;?
Выполните программу для предложенных исходных данных: a=-1, b=-2, c=4.
program z1;
uses crt;
var a,b,c: integer; s: real;
begin
write (a=’); readln (a);
write (b=’); readln (b);
write (c=’); readln (c);
s:= (a*b+c)/6;
writeln (s=’, s:1:0);
readkey
end.
Составить программу. В магазин привезли r кг яблок, а груш в s раз больше. Сколько всего фруктов привезли в магазин?
Составить программу. Найти значение выражения: u=f(25,a)+f(b,15), где 13 EMBED Equation.3 1415.
Root Entry