Информатика | 5 - 9 классы
Составьте алгоритм нахождения суммы четных и нечетных чисел от 1 до 100.
На языке ПАСКАЛЬ.
Составьте алгоритм четного числа в квадрат, а нечетного в куб?
Составьте алгоритм четного числа в квадрат, а нечетного в куб.
В Паскале пожалуйста?
В Паскале пожалуйста.
Для N вводимых с клавиатуры чисел определить количество четных чисел и сумму нечетных чисел.
Программа на Паскале?
Программа на Паскале.
Нахождение произведения четных чисел и суммы нечетных чисел меньше 15.
Пожалуйста, помогите : Составить программу паскаль для нахождения суммы двузначных четных чисел?
Пожалуйста, помогите : Составить программу паскаль для нахождения суммы двузначных четных чисел.
Составьте алгоритм нахождения наименьшего из трех значений в паскаль?
Составьте алгоритм нахождения наименьшего из трех значений в паскаль.
Составить программу на языке паскаль по нахождению суммы двух любых чисел?
Составить программу на языке паскаль по нахождению суммы двух любых чисел.
Составьте программу подсчета суммы четных и количества нечетных чисел от 1 до 200?
Составьте программу подсчета суммы четных и количества нечетных чисел от 1 до 200.
Составьте алгоритм возведения четного чилса в крадрат, а нечетного - в куб?
Составьте алгоритм возведения четного чилса в крадрат, а нечетного - в куб.
Написать программу для нахождения суммы первых пяти нечетных чисел (Паскаль)?
Написать программу для нахождения суммы первых пяти нечетных чисел (Паскаль).
Написать алгоритм нахождения суммы четных чисел от 0 до 12?
Написать алгоритм нахождения суммы четных чисел от 0 до 12.
На этой странице находится вопрос Составьте алгоритм нахождения суммы четных и нечетных чисел от 1 до 100?. Здесь же – ответы на него, и похожие вопросы в категории Информатика, которые можно найти с помощью простой в использовании поисковой системы. Уровень сложности вопроса соответствует уровню подготовки учащихся 5 - 9 классов. В комментариях, оставленных ниже, ознакомьтесь с вариантами ответов посетителей страницы. С ними можно обсудить тему вопроса в режиме on-line. Если ни один из предложенных ответов не устраивает, сформулируйте новый вопрос в поисковой строке, расположенной вверху, и нажмите кнопку.
Uses crt ;
var i, s1, s2 : integer ;
begin for i : = 1 to 100 do begin if i mod 2 = 0 then s1 : = s1 + i else s2 : = s2 + i ; end ; writeln('Сумма четных чисел : ', s1) ; write('Сумма нечетных чисел : ', s2) ;
end.