Всем шарящим! :) Подробно расписать в Pascal и пояснить. (просто ответ не нужен, он есть уже - 3) Задание: Что будет выведено на экран после выполнения фрагмента программы? a:=10, b:=5, с:=6 if (a>b) and (b>c) then x=3*a+2*b+c else x=5*a-b+c
program WhatWillBeOutput; var a, b, c, x: integer; begin a := 10; b := 5; c := 6; if (a > b) and (b > c) then x := 3 * a + 2 * b + c else x := 5 * a - b + c; writeln('x = ', x); end.
Пояснение:
Присваиваем значения переменным: a=10, b=5, c=6.Проверяем условие: a>b и b>c. В данном случае это верно, так как 10>5 и 5>6 - ложь.Поэтому выполняется ветка else, где x вычисляется по формуле: 5 a - b + c = 5 10 - 5 + 6 = 50 - 5 + 6 = 51.На экран будет выведено: x = 51.
var
a, b, c, x: integer;
begin
a := 10;
b := 5;
c := 6;
if (a > b) and (b > c) then
x := 3 * a + 2 * b + c
else
x := 5 * a - b + c;
writeln('x = ', x);
end.
Пояснение:
Присваиваем значения переменным: a=10, b=5, c=6.Проверяем условие: a>b и b>c. В данном случае это верно, так как 10>5 и 5>6 - ложь.Поэтому выполняется ветка else, где x вычисляется по формуле: 5 a - b + c = 5 10 - 5 + 6 = 50 - 5 + 6 = 51.На экран будет выведено: x = 51.