написать программу(на ABC pascal), которая находит сумму четных цифр
5-9 класс
|
и произведение нечетных чисел
в диапазоне от 1 до 10.
Как-то так, если синтаксис помню:
sum := 0;
mul := 1;
for index := 1 to 10 do
begin
if (index mod 2 = 0) then
begin
sum := sum + index;
end;
else
begin
mul := mul * index;
end;
end;
Другие вопросы из категории
вопросы, допускающие только ответы "да" или "нет". Коля старается за наименьшее число вопросов отгадать число, задуманное Петей. Его стратегия основана на делении числового интервала пополам и выяснении, какой из половин находится задуманное число.
количество информации содержат 6 страниц текста? Выразить в Кбайтах (округлить до двух знаков после запятой)
б) _Кбайт = _байт = 20.000 бит
в) _Гбайт = _Мбайт = Кбайт
г) _Гбайт = 256 Мбайт = _Кбайт.
Читайте также
помощью которой определите сумму кубов цифр этого числа
ввести 3 значное число и находит сумму его цифр.
2. Написать программу, которая предлагает ввести 3 значное число и меняет порядок цифр наоборот. (123- 321)
3.Написать программу, которая предлагает ввести три числа с клавиатуры, находит их сумму, произведение и среднее арифметическое.
Перевод дюймов в сантиметры (1дюйм=2,54см). Нужно, чтобы при запуске программы на экране выходило в два столбика дюймы и сколько это будет сантиметров. До 20 чисел. Через оператор While.