в паскале нужно составить программу нахождения суммы чисел от 0 до 24 с шагом 3
5-9 класс
|
кнаталья
23 июля 2015 г., 3:37:04 (8 лет назад)
суперсаша
23 июля 2015 г., 5:47:12 (8 лет назад)
uses crt;
var i,k,n.Sum:integer;
begin
read (n);
sum:=0;
k:=0;
for i:=0 to n do
begin
k:=3;
Sum:=Sum+i;
end;
writeln(sum);
end.
T1976
23 июля 2015 г., 7:02:33 (8 лет назад)
var i,s:integer;
begin
for i:=1 to 24 do
if i mod 3 = 0 then s+=i;
writeln(s);
end.
Ответить
Другие вопросы из категории
Читайте также
Помогите решить: 1.Написать программу нахождения суммы чисел от 1 до 24. 2.Написать программу печати трех чисел,введенных с
клавиатуры,в порядке возрастания.
1)Составить программу нахождения суммы квадратов чисел от 25 до 125.
2) составить программу нахождения чисел от 10 до 99 сумма квадратов которых кратна 13 (mod=0)
3) найти сумму всех целых нечетных чисел меньших 100
4) найти сумму чисел в диапазоне от A до B кратных четырём. Числа А и В вводятся с клавы.
5) Найти все натуральный делители натурального числа n
Вы находитесь на странице вопроса "в паскале нужно составить программу нахождения суммы чисел от 0 до 24 с шагом 3", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.