Проанализируйте работу программы
program math;
var x, y: integer;
begin
x:=1; y:=1;
while x<7 do
begin
у:=y*2;
x:=x+1
end;
end.
Ответьте на вопросы:
а) Сколько раз исполнится тело цикла?
б) Сколько раз исполнится тело цикла, если изменить условие на х>=7?
Определить значение переменной Y в результате выполнения фрагмента программы
y =1; i =0; k =2; for (int i = 1; i <= 6; i ++) y = k * y;
(c++)
3. Определите значение переменных i, y после выполнения фрагмента программы
y = 5
i = 1
while i<=5:
i+=2
y*=2
1)Какой из заголовков циклов не содержит ошибок?
FOR X:=3 DOWNTO 12 DO
FOR J:=10 DOWNTO -2 DO
FOR K=10 DOWNTO 5 DO
FOR I:=10 DOWNTO 5.5 DO
2)Сколько раз выполнится тело цикла for i:=2 to 5 do x:=6;
3)на фото
Расположите в правильном порядке строки программы:
1) S:=a*h;
6) var a,b,h,p,s: integer;
2) end.
7) readln;
3) program pr;
Writeln(‘p=’,p,’ s=’,s);
4) p:=(a+b)^2;
9) a:=5;b:=8;h:=3;
5) begin
2. Установите соответствие между служебными словами и названиями разделов программы:
а) Var а) Раздел операторов
b) Program b) Раздел имени программы
c) Uses c) Раздел описания переменных
d) Begin …end d) Раздел описания библиотечных модулей
3. Определите значение переменной a после выполнения алгоритма:
а := 8
b := 2
b := a/2*b
a := 2*а + 3*b
В ответе укажите одно целое число — значение переменной a.
4.Запишите значение переменной y, полученное в результате работы следующей программы.
var y, i: integer;
begin
y := 0;
for i := 1 to 3 do
y := y + 4 * i;
writeln(y);
end.
5.Запишите значение переменной t, полученное в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
var t, i: integer;
begin
t := 2;
for i := 1 to 3 do
t := t * i;
writeln(t);
end.
скільки разів виконається тіло циклу у наступному фрагменті програми? s=1 n=10 while n=10 s=s+2
Відповіді:
жодого разу
1 раз
5 раз
безліч разів
CРОЧНО НАДО ПАСКАЛЬ! ПО-БЫСТРОМУ!
Цикл с параметром. Урок 1
8 Задание
Определи результат переменной s после выполнения кода программы.
s=1
x=2
for y in range(4):
s=math.pow(x,y)
4
16
8
6
Помогите решить.
1. В результате выполнения следующих операторов:
a:=3;
b:=4;
x:=sqrt(sqr(a) +sqr(b);
Write(‘ x= ‘ ,x, ‘ a+b=7 ‘);
Writeln(a, b,’a’, ‘b’);
Будет напечатано:
Д) x= 5true 34ab
E) x= 5 a+b=7 34ab
Ж) x=sqrt(sqr(a) +sqr(b)), a+b=7 34ab
З) x= 5.00000000000000E+0000 true 34ab
2. Определите значение целочисленной переменной a после выполнения фрагмента алгоритма:
a:=247;
b:=(a div 100)*10+9;
a:=(10*b-a) mod 10;
3. Укажите значение для переменных x и y после выполнения операторов:
x:=2;
y:=5;
x:=y;
y:=x;
4. Какую задачу решает данная программа?
program primer;
car a, b, c : integer;
begin
writeln(‘введите двузначное число’);
readln(a);
b:=a div 10;
c:=a mod 10;
write(c*10+b);
end.
Д) находит сумму цифр числа;
Е) вычисляет целую часть и остаток от деления на 10;
Ж) меняет цифры числа местами;
З) находит цифры числа, а на экран выводит само число.
5. Среди предложенных выражений выберите логические
И) (x=3)or (x<>4)
К) 2*x+5
Л) x mod 2 = 0
М) x div 3
Н) x+y = 10
0) x+y
П) (x+y>5) or (x-y>5)
Р) (x>3) and (x<=10)
Скільки разів буде виконуватися тіло циклу For I:=7 To 8 Do —
For I:=8 To 7 Do —
For I:=0 To 0 Do —
For I:=1 To 5 Do-
15. Сколько раз будут выполнены операторы внутри цикла в следующем фрагменте
х = 2; у =10,
while y- x> 1 do begin
x = x+ 1 y = y-1, end
sum:= x+ y;
Cкільки разів виконається цикл: x:=15; while x>=10 do x:=x-3; *
Ответ:
а) Тело цикла исполнится 6 раз
б) Если изменить условие на х>=7, тело цикла исполнится 0 раз