Информатика | 5 - 9 классы
Составьте программу для нахождения суммы всех четных чисел 1 - 40.
Составьте программу нахождения суммы чисел третьего десятка( Паскаль)?
Составьте программу нахождения суммы чисел третьего десятка( Паскаль).
PASCAL ABC : Составьте программу вычисления суммы четных чисел в диапазоне от 1 до 100?
PASCAL ABC : Составьте программу вычисления суммы четных чисел в диапазоне от 1 до 100.
Составьте программу для нахождения суммы всех натуральных трехзначных чисел, кратных 30?
Составьте программу для нахождения суммы всех натуральных трехзначных чисел, кратных 30.
Составьте программу нахождения суммы всех целых чисел в диапазоне от - 5 до n?
Составьте программу нахождения суммы всех целых чисел в диапазоне от - 5 до n.
Составьте программу нахождения суммы всех целых чисел в диапазоне от - 5 до n через while?
Составьте программу нахождения суммы всех целых чисел в диапазоне от - 5 до n через while.
Помогите в Бейсике составить программу на нахождение суммы четных чисел интервале(интервал любой)?
Помогите в Бейсике составить программу на нахождение суммы четных чисел интервале(интервал любой).
Написать программу на нахождение суммы отрицательных четных чисел на языке Pascal ABC?
Написать программу на нахождение суммы отрицательных четных чисел на языке Pascal ABC.
Составьте программу нахождения суммы 100 первых чисел, кратных 3?
Составьте программу нахождения суммы 100 первых чисел, кратных 3.
Составьте программу для нахождения суммы всех двухзначных чисел кратных трём?
Составьте программу для нахождения суммы всех двухзначных чисел кратных трём.
Составить программу нахождения суммы четных чисел на на промежутке от 20 до 30?
Составить программу нахождения суммы четных чисел на на промежутке от 20 до 30.
(использовать только цикл While).
На странице вопроса Составьте программу для нахождения суммы всех четных чисел 1 - 40? из категории Информатика вы найдете ответ для уровня учащихся 5 - 9 классов. Если полученный ответ не устраивает и нужно расшить круг поиска, используйте удобную поисковую систему сайта. Можно также ознакомиться с похожими вопросами и ответами других пользователей в этой же категории или создать новый вопрос. Возможно, вам будет полезной информация, оставленная пользователями в комментариях, где можно обсудить тему с помощью обратной связи.
Program n1 ;
var i, sum : integer ;
begin
sum : = 0 ;
for i : = 1 to 40 do if(i mod 2 = 0) then sum : = sum + i ;
writeln(sum) ;
end.