Нужно составить программу для решения следующей задачи: Вводятся 234 числа. Определить, сколько среди них четных чисел.
5-9 класс
|
var a,s :integer;
begin
a:=0;
s:=0;
repeat
a:=a+1;
if a mod 2 = 0 then
s:=s+1;
until
a=234;
writeln('кол-во четных чисел : ',s)
end.
Другие вопросы из категории
яблоко уравновешивается на чашечных весах персиком и сливой. Два ананаса уравновешиваются тремя персиками. Яблоко и слива уравновешиваются ананасом. сколько слив?
Монитор Текстовая информация
Принтер Графическая информация
Микрофон Звуковая информация
Акустические колонки Видео информация
Сканнер
Веб- камера
Читайте также
рождения 1 доллар. В каждый следующий день рождения он удваивал свой подарок и прибавлял к нему столько долларов, сколько лет исполнилось его племяннику. Определите, к какому дню рождения сумма превысит 100 долларов? Помогите плииз.
его прогнать, он прогонял сам, полыхая огнем. Количество полыханий зависело от того, на кого надо полыхать. На царевича дракон полыхал 5 раз, на королевича — 4 раза, на простого рыцаря — 3. За первые сто лет дракона пытались прогнать 2 царевича, 3 королевича и 5 простых рыцарей. За второе столетие на него покушались 3 царевича, 2 королевича и7 простых рыцарей. За третий век дракона беспокоили 7 царевичей, 5 королевичей и 6 простых рыцарей. За следующее столетие Сергею Михайловичу пришлось иметь дело с 3 царевичами, 6 королевичами и 10 простыми рыцарями. После чего дракона, в конце концов, оставили в покое и объявили гору, на которой он жил, заповедником для охраны редких видов животных.Сколько человек пытались прогнать дракона за каждое из столетий в отдельности и за все 4 века вместе? Сколько среди них было царевичей, сколько королевичей и сколько простых рыцарей? Сколько раз дракону пришлось полыхать на них огнем в течение каждого века и за все 4 столетия вместе? Сколько полыханий досталось царевичам, сколько — королевичам и сколько — простым рыцарям?Введите необходимые формулы и проведите по ним расчеты. Сохраните таблицу в собственной папке под именем Дракон. Помогите пожалуйста!!! Киньте готовую таблицу
последовательности букв а. Pascal.Срочно плиз помогите!!!
наибольшим из них и выведите результаты на экран. Иначе, найдите и выведите сумму квадратов этих чисел.