сервис вопросов и ответовНаписать программу на Pascal
5-9 класс|
|
Пользователь вводит число. Сколько последовательно расположенных натуральных чисел необходимо, что бы их произведение стало больше введенного пользователем числа.
Susanna2505
13 февр. 2015 г., 23:03:27 (9 лет назад)
72yr
14 февр. 2015 г., 0:29:24 (9 лет назад)
Var
a,b,c:integer;
Begin
b:=1;c:=1;
Write('Введите число: '); readln(a);
while (b<=a) do
begin
c:=c+1;
b:=b*c;
end;
Writeln('Ответ: ',c);
End.
Ответить
Другие вопросы из категории
Зеленый цвет на одном компьютере кодируется кодом 0010, а на другом 010. Разрешающая способность обоих компьютеров составляет 640x200. Каков объем
станицы видеопамяти на этих компьютерах?
средняя скорость передачи данных по каналу связи равна 30 кб/с определите сколько понадобится секунд чтобы передать по этому каналу 80 страниц текста,
каждая страница которого содержит в среднем 128 символов а информационный вес одного символа равен 8 битам
Читайте также
Написать программу Turpo pascal помогите пожалуйста что сможете!!! Вывести на экран 6 раз свое имя. Составить блок-схему и написать программу
вычисления суммы чисел от 6 до 10. Написать программу вычисления n! (факториал числа n), где n- целое неотрицательное число.
Определение факториала:
0!=1, 1!=1, 2!=1*2, 3!=1*2*3, ……,n!=1*2*3*…*(n-1)*n.
Другими словами n!- это произведение n натуральных чисел.
Написать программу на языке программирования Pascal.
Перевод дюймов в сантиметры (1дюйм=2,54см). Нужно, чтобы при запуске программы на экране выходило в два столбика дюймы и сколько это будет сантиметров. До 20 чисел. Через оператор While.
написать программу на Pascal abc в которой разными цветами в центре и по углам экрана будет выводиться имя "Сергей" и проверить работоспособность на
компьютере( то есть проверить будет ли работать программа)
Вы находитесь на странице вопроса "Написать программу на Pascal", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.