Program lol (input, output);
var a, b, I:integer;
begin
write ('Введите число а: ');
read (a);
write ('Ввндите число b: ');
read (b);
for I:=-10 to 0 do
begin
if a=I then
writeln ('Число а пренадлежит промежтку');
if b=I then
writeln ('Число b пренадлежит промежтку');
end;
end.

0 0

4 года назад

В результате работы алгоритма Y:=X-5 X:=2*(Y+1) Y:=X+Y вывод Y переменная Y приняла значение 5. Укажите число, которое являлось

Фёдор К

Правильный ответ 6,

при x=6
y:=6-5 (y=1)
x:=2*(1+1) (x=4)
y:=4+1=5, т.е 6 - правильный ответ, т.к x+y=4+1=5 - подходит

при X=7
y:=7-5 (у=2)
x:=2*(2+1) (x=6)
y:=6+2=8, т.е 7 - не подходит;

при x=5
y:=5-5 (y=0)
x:=2*(0+1) (x=2)
y:=0+2=2, т.е 5 - не подходит;

при x=4
y:=4-5 (y=-1)
x:=2*(-1+1) (x=0)
y:=0+(-1)=0-1=-1, т.е 4 - не подходит;

0 0

4 года назад

Напишите программу, которая находит значение выражения y:=x*2+3

ВераСтолбова [17]

Program program1;
var
x, y: real;
begin
writeln('Введите X: ');
readln(x);
y := x * 2 + 3;
writeln('y = ', y);
end.

0 0

4 года назад