Отыскать произведение чисел 1*3*5*7 их творение равно 105 написать эту програму

Отыскать творенье чисел 1*3*5*7 их творение одинаково 105 написать эту програму в Pascal

Задать свой вопрос
Лилия Горянская-Горбузова
сек
Надя Фасеева
сделал
Магнусова Лидия
кинь
Julja Menzhulova
в каком ты класе?
Тамара Клунова
в 9
Диана Капезина
оооо
Светлана Синяшек
кинь програму прошу
Timur Hamchenkov
обнови стр я изменил ответ на новую
Strelova Angelina
спасибо громадное
Миха Ясинцев
я лайк поставил
1 ответ
var a, sum: real;
var i: integer;
begin
sum:=1;
a:=1;
for i:=1 to 3 do begin 
a:=a+2; 
sum:=a*sum; 
end;
writeln (sum);
end.
Васька Хаэт
спасибо огромное
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт