Var s, n: integer; begin s := 42; n := 1; while s больше 0 do begin s := s – 5; n := n + 3 end; writeln(n) end Помогите решить задание по информатике!!!
Var s, n: integer;
begin
s := 42;
n := 1;
while s > 0 do
begin
s := s – 5;
n := n + 3
end;
writeln(n)
end
Помогите решить задание по информатике!!!
Гость
Ответ(ы) на вопрос:
ГостьШаг №1
S = 42 - 5 = 37
n = 1 + 3 = 4
Шаг №2
S = 37 - 5 = 32
n = 4 + 3 = 7
Шаг №3
S = 32 - 5 = 27
n = 7 + 3 = 10
Шаг №4
S = 27 - 5 = 22
n = 10 + 3 = 13
Шаг №5
S = 22 - 5 = 17
n = 13 + 3 = 16
Шаг №6
S = 17 - 5 = 12
n = 16 + 3 = 19
Шаг №7
S = 12 - 5 = 7
n = 19 + 3 = 21
Шаг №8
S = 7 - 5 = 2
n = 21 + 3 = 24
А вот КОРОТКОЕ решение:
42 / 5 = 8 + 2/5
n = 8*3 = 24
Не нашли ответ?
Похожие вопросы