Составители:
Рубрика:
32
(4). x:=12;y:=5;
if x>0
then if x<8
then y:=sqr(x)
else y:=2*x+1;
y:=0;
(5). x:=8;
if x>9
then y:=2*x+1
else if x<7
then y:=0
else y:= sqrt(10-x);
(6). x:=5;
if x>0
then y:=2*x+1
else if x<8
then y:=sqr(-x)
else y:=0;
40. Перепишите команду ветвления через команду выбора: (x и t-целые числа в
диапазоне от 0 до 70).
(1). if (t>=16) and (t<25) then writeln
('норма') else if (t>=26) then writeln
('повышена') else writeln ('понижена');
(2). if (x>=10) and (x<37) then y:=2*x+1
else if (x>=0) and (x<55) then
y:=x*x*x else y:=0;
41.Перепишите команду выбора через команду ветвления.
(1). case t
-273..0: o:='лед';
1..100: o:='вода';
101..200: o:='пар';
end;
(2). case k of
10..20: f:=sqrt(k-5);
0..150: f:=sqr(k+1)
else f:=sqrt(abs(k))
end;
42. Определите, при каком значении аргументов после исполнения фрагмента
программы получится указанный ответ (для каждого
случая указать все решения).
(1). if (a=0) and (b>0) then writeln ('x-
любое число') else if (a=0) and (b<=0)
then writeln ('решений нет') else if
(a<0) then writeln ('х<',-b/а:5:2) else if
(a>0) then writeln ('х>',-b/а:5:2);
(2). if (x >=-1) and (x <=3) then y:=x*2
else if (x >=-4) and (x<5) then y:=x*x-
10 else if (x >=5) then y:=x else y:=1;
ОТВЕТ:1. x<5
2. решений нет
3. 3. x>-3
ОТВЕТ:1. y=6 2.
2. y=-25 3.
3. y=1
43. Как работает при разных значениях аргументов следующий фрагмент программы?
d:=b*b-4*a*c;
if d<=0
then writeln('Действительных корней нет')
else x1:=(-b-sqrt(d))/2/a; x2:=(-b-sqrt(d))/2/a;
writeln('x1=',x1:5:2,' x2=',x2:5:2);
44.Перепишите команду ветвления без составных условий.
(1). if (t>=36) and (t<37)
then writeln ('норма')
else if (t>=37) and (t<42)
then writeln ('повышена')
else if (t>=35) and (t<36)
then writeln ('понижена')
else writeln ('ошибка');
(2). if (a=0) and (b=0)
then writeln ('x-любое число')
else if (a=0) and (b<>0)
then writeln ('решений нет')
else if (a<>0)
then writeln ('х=',b/а:5:2);
Страницы
- « первая
- ‹ предыдущая
- …
- 30
- 31
- 32
- 33
- 34
- …
- следующая ›
- последняя »