Напишите программу на языке паскаль вывода всех чётных чисел не кратных 4 в диапазоне от 50-70 и найдите их количество.
taylakova090820
3
23.04.2019 19:20
1
Другие вопросы по теме Информатика
Maxutka007
19.04.2021 10:58
MozgVeka
19.04.2021 10:58
rahbfwBbdqbqdI
09.08.2020 21:12
Pipidastet
09.08.2020 21:53
nafani1
16.05.2021 13:48
nasti0902003
16.05.2021 13:48
wayly
16.05.2021 13:52
dora12345pandora
18.07.2019 03:10
1Shupy4ka
13.07.2019 19:30
Популярные вопросы
- Еура6) обозначь порядок действий неоча...
2 - Вычисли угол RNK и радиус окружности, если MN= 138, а ∢RNO=30°.∢RNK=°ON=...
3 - Напишите уравнения реакций, с которых можно осуществить следующие превращения:...
2 - Замените одну букву - получите новое слово. Почка-? Папка-? Коса-? Ум-? Вечер-?...
1 - Характер Лады в сказке Снегурочка Островский...
1 - Рассмотрите скульптуру Джордано Бруно. Опишитеого Составьте диалог с ученым-астрономом,рый...
1 - 1)Напряжение между двумя разноименно заряженными пластинами составляет 50...
1 - Чему равен центральный угол если соответствующий ему вписаный угол равен...
2 - Как добывают себе пищу гуси?...
3 - Возведи в квадрат (x−12)2 . Которые из ответов неправильные? x2+24x+144 x2−24x+144...
2
program raf105;
var a,i:integer;
begin
for i:=50 to 70 do
begin
if ((i mod 2)=0) and ((i mod 4)<>0)
then a:= a+1;
end;
writeln('Вывод: ',a);
end.
Язык программирования PascalABC