1. Информатика
  2. Составьте программу, выводящую

Составьте программу, выводящую на экран в первую строку четные числа от 1 до 30 через пробел, а во вторую нечётные числа от 10 до 20

Kusya2003 Kusya2003    3   08.07.2019 12:10    0

Ответы
УмНиК4980 УмНиК4980  16.09.2020 13:51
Var i:integer;
begin
for i:=1 to 30 do
if i mod 2=0 then write(i,' ');
writeln;
for i:=10 to 20 do
if i mod 2=1 then write(i,' ');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
санёк1234567817626 санёк1234567817626  12.10.2019 06:30
64. для трех данных чисел найти произведение наибольшего числа на наименьшее. блок схема,желательно на листочке...
obelardo1 obelardo1  12.10.2019 08:20
Компьютерные сети как средство коммуникации возникли: а) когда появились компьютеры б) когда созрела общественная потребность общение между людьми проживающими в разных...
поолра поолра  12.10.2019 08:17
Мартышка-мама связала 111 своим непослушным детишкам по перчатке на каждую руку и ногу. но они порвали все свои перчатки, кроме младшего, который порвал только 11. сколько...
aleksandr17082004 aleksandr17082004  12.10.2019 08:13
Обчисліть довжину двійкового коду деякого тексту за умови, що символи тексту закодовані з використанням таблиці кодів символів windows-1251. у тексті 32 сторінки, кожна...
Лианиа Лианиа  12.10.2019 08:10
Нужно сегодня номер 4 5 6​ нужно сравнить числа...
Rima02 Rima02  12.10.2019 08:09
ответьте на такой вопросик мне - я использую социальной сети народ надо соблюдать культура взаимоотношений при общении с другими пользователями зачем ? потому что я новичек...
gusarova17 gusarova17  12.10.2019 08:05
При использовании социальной сети надо соблюдать культуру взаимоотношений при общении с другими пользователями с другими показателями зачем?...
sdamna5uveren sdamna5uveren  27.07.2019 22:00
Расположите устройства внешней памяти в порядке убывания их объёма укажите порядок следования всех 4 вариантов ответа: __ жесткий диск __ cd-rom __ дискета __ dvd-rom...
kylie333 kylie333  27.07.2019 22:00
Отметьте имя атрибута птица а) соловей б ) лететь в) крыло г) окрас...
SuperMaksni4ic SuperMaksni4ic  27.07.2019 22:10
Элементы массив[1..3,1..4] of integer получили значения после выполнения следущего алгоритма: for i: = 1 to 3 do for j: = 1 to 4 do begin read(d); a[i,j]: =d; end; какое...

Популярные вопросы