Помогите по Паскалю !!!!СРОЧНО. Пожалуйста
Ребята, буду очень благодарен если поможете :-)))
Определить значение переменной s после выполнения следующих фрагментов программы:
1. Var s; real;
i : integer;
. . .
s := 0;
for i := 1 to 4 do
begin
s := s*10 ;
s := s + I ;
end;
Определить значение переменной y после выполнения следующих фрагментов программы:
2. Var y : real;
x : integer;
. . .
y := 0;
for x := 6 downto 2 do
y := y +x;
y := y /5;
Определить значение переменной s после выполнения следующих фрагментов программы:
3. Var s : real;
n : integer;
. . .
s := 0;
for n := 6 downto 3 do
begin
s := s + 1;
s := s *2;
end;
Ответы
Ответ дал:
0
1. Программа умножает своё значение на десять и затем прибавляет индекс цикла. В итоге делает это 4 раза.
Это равносильно сложению строковых данных в виде чисел от одного до четырёх.
s = '1' + '2' + '3' + '4' = 1234
Ответ: 1234.
2. Программа прибавляет к значению y значение индекса x (от 6 до 2) и затем делит значение на 5. [5 раз]
y = (0 + 6) / 5 = 1.2
y = (1.2 + 5) / 5 = 1.24
y = (1.24 + 4) / 5 = 0.848
y = (0.848 + 3) / 5 = 0.7696
y = (0.7696 + 2) / 5 = 0.55392
Ответ: 0.55392.
3. Программа прибавляет к значению s один и затем умножает значение на 2. [4 раза]
s = (0 + 1) * 2 = 2
s = (2 + 1) * 2 = 6
s = (6 + 1) * 2 = 14
s = (14 + 1) * 2 = 30
Ответ: 30.
Вас заинтересует
1 год назад
2 года назад
7 лет назад
7 лет назад
8 лет назад