40 построить программу pascal вычислить натуральное число n. вывести на экран все честные числа от 0 до n
Still227
1
24.06.2019 09:30
0
Другие вопросы по теме Информатика
saqo2017
18.12.2020 08:38
ctalin123123
16.04.2020 10:39
timirshan
16.04.2020 10:52
Алексей211177
16.04.2020 11:19
ShurenkoPasha12
16.04.2020 11:23
Популярные вопросы
- Из 100 кг свеклы получили 7 кг сахара сколько кг сахара получится из...
3 - Какие финансовые источники были у большевиков для проведения индустриализации...
3 - Пассажир поезда идущего со скоростью 50 километров час заметил что встречный...
1 - Сообщение по окружающему миру про яд...
3 - Ли вам чтение актеров представить внешность персонажей?...
2 - Сообщение об животном и растение австралии...
3 - Объясни выбор букв. слова: близко, россии, образцовая....
1 - Найдите значение а , если: -а= -2,1 ;...
3 - Двоє велосипедистів виїхали із села одночасно у протилежних напрямках....
3 - Решите , а то все время найдите значение выражения: 3х-2 при х= 1 2/3....
2
program raf105;
var
n: integer;
begin
write('n = ');
readln(n);
for n:=0 to n do
if (n mod 2 = 0) and (n <> 0) then
write(n,' ');
end.
PascalABC