сервис вопросов и ответовНапишите программу на языке паскаль, которая вычесляет сумму:
5-9 класс|
|
а) первых n натуральных чисел;
б) квадратов первых n натуральных чисел;
в) всех чётных чисел в диапазоне от 1 до n;
г) всех двузначных чисел.
милаха97
20 янв. 2017 г., 10:43:35 (7 лет назад)
Xayst2006
20 янв. 2017 г., 12:19:17 (7 лет назад)
Пункт а), остальные аналогично, просто поменяй условия
var n,i,k:integer;
begin
read (n);
if (n>=1) then
begin
k:=0;
for i:=1 to n do
begin
k:=k+i;
end;
writeln (k);
end
else writeln ('Неверные условия');
end.
Ответить
Другие вопросы из категории
1.Найти произведение всех натуральных чисел, кратных 3 и меньших 13. Обратите внимание, что начальное значение Р=1.
2.Найти количество натуральных чисел, нечет
Читайте также
Напишите программу на языке паскаль, которая выводит на экран таблицу степеней двойки(от нулевой до десятой). Рекомендуемый вид экрана после выполнения
программы представлен ниже:
Помогите, пожалуйста, очень нужно! Срочно!:( 1) Не используя функцию возведения в квадрат, напишите на языке Паскаль наиболее короткие алгоритмы
вычисления: а) y=x^10 б) y=x^15. Постараться использовать минимальное количество дополнительных переменных. 2) Дана сторона равностороннего треугольника. Найти площадь этого треугольника, его высоты, радиусы вписанной и описанной окружностей. Программу записать на языке Паскаль. 3) Дана величина А, выражающая объём информации в байтах. Перевести А в более крупные единицы измерения информации. Программу записать на языке Паскаль
Вы находитесь на странице вопроса "Напишите программу на языке паскаль, которая вычесляет сумму:", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.