Задание 8. ЕГЭ по информатике
ЕГЭ задание 8
Задание 1. Определите значение переменной c после выполнения следующего фрагмента программы. Ответ запишите в виде целого числа.
a := 17;
b := 20;
a := 3 * a - b;
if a > b then
c := 5 * a - b
else
c := 5 * a + b;
Задание 2. Определите, что будет напечатано в результате работы следующего фрагмента программы:
var k, s: integer;
begin
s:=1;
k:=0;
while k < 13 do begin
s:=s+2*k;
k:=k+4;
end;
write(s+k);
end.
Задание 3 Определите, что будет напечатано в результате работы следующего фрагмента программы:
var k, s: integer;
begin
s:=0;
k:=0;
while k < 30 do begin
k:=k+3;
s:=s+k;
end;
write(s);
end.
Задание 4. Запишите число, которое будет напечатано в результате выполнения программы. Для Вашего удобства программа представлена на пяти языках программирования.
var s, n: integer;
begin
s := 301;
n := 0;
while s > 0 do
begin
s := s - 10;
n := n + 2;
end;
writeln(n)
end.
Задание 5. Определите, что будет напечатано в результате выполнения программы, записанной ниже на разных языках программирования:
var n, s: integer;
begin
n : = 1;
s : = 0;
while n <= 101 do
begin
s : = s + 7;
n : = n + 1
end;
write(s)
end.
Задание 6. Определите, что будет напечатано в результате выполнения программы (записанной ниже на разных языках программирования):
var n, s: integer;
begin
n := 0;
s := 0;
while s <= 365 do
begin
s := s + 12;
n := n + 5
end;
write(n)
end.
Задание 7. Определите, что будет напечатано в результате выполнения программы (записанной ниже на разных языках программирования).
var n, s: integer;
begin
n := 0;
s := 1;
while s <= 1000 do
begin
s := s * 3;
n := n + 3;
end;
write(n)
end.