Произведение всех четных чисел

Ответ или решение 1

// Пример программы на языке Паскаль.

var
i : integer; // объявляем переменную целочисленного типа.

p : real; // объявляем переменную вещественного типа.
begin
p := 1; // нужно, для того чтобы произведение не равнялось 0.
for i := 1 to 50 do // начало цикла.
begin
if (i mod 2 = 0) then // проверяем является ли текущее число четным.
begin
p := p * i; // считаем произведение четных чисел.
end;
end;
writeln(‘Произведение четных чисел в диапазоне от 1 до 50 равно: ‘, p); // вывод результата.
end.

не похоже на правильный ответ

8.91750643294582E76 — не похоже на правильный ответ))

а как сделать чтобы вывело по другому? это возможно?

а как сделать чтобы вывело по другому?

Если не понимаете, то : 8.91750643294582E76 = 8.91750643294582*10^76

for i:=1 to 50 do begin

P.s. Программа написана на языке PascalABC, странный ответ она выдает потому, что в данном языке есть ограничения, и число, которое получается, выходит за диапазон данного значения.

Если ответ по предмету Экономика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.

Читайте также  Самый большой выбор штор в москве
Ссылка на основную публикацию
Adblock
detector