1. Подсчитать творение n введенных чисел. (цикл с предусловием)2. Вычеслите разность

1. Подсчитать творение n введенных чисел. (цикл с предусловием)
2. Вычеслите разность между суммой четных и суммой нечетных чисел из числового интервала от 1 до 50.(цикл For)
3. Вывести на экран n звездочек. (цикл с постусловием)
Заблаговременно спасибо!

Задать свой вопрос
Альбина Комукова
Паскаль?
Таисия Гаврелюк
Да
1 ответ
Var p,i: integer;
begin
p:=1;
read(n);
x:=1;
while xlt;=n do
p:=p*i;
writeln(p);
end.
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

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

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

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

Войти на сайт