составить программу(pascal) в которой посчитать произведение чисел от 1 до 9
10-11 класс
|
var
s, i: integer;
begin
s:= 1;
for i:= 1 to 9 do
s:= s * i;
writeln(s);
end.
Другие вопросы из категории
сколько сим-волов содержал переданный текст, если из-вестно, что он был представлен в 16-битной кодировке Unicode.
уровня - ru. Что необходимо ввести в строку браузера, чтобы попасть на данный
сайт?
2)удалить последнее слово из строки
Читайте также
статей опубликовал каждый внештатный корреспондент. Составьте программу, с помощью которой определить, сколько денег нужно выплатить каждому внештатному корреспонденту, если за каждую опубликованную статью полагается по 50 у.е. Вознаграждения.
1) напишите программу вычисления факториала числа n (произведение чисел от 1 до n)
2) Напишите программу суммы четных чисел от 1 до 5
3) Напишите программу угадывания чисел, в которой компьютер делает подсказки: меньше или больше.
1) напишите программу вычисления факториала числа n (произведение чисел от 1 до n)
2) Напишите программу суммы четных чисел от 1 до 5
3) Напишите программу угадывания чисел, в которой компьютер делает подсказки: меньше или больше.
2)Написать программу определяющую сумму всех нечетных чисел от 1 до 99