Всем . как написать программу в паскале чтобы она вывела на экран все числа от 1 до 100, только таким образом 1,2,5,6,9,10,13,14,17,18,21,22,25,26,29,30 и т.д надеюсь закономерность поняли. заранее огромное !
1)Назовите систему, в которой для записи любых чисел используется всего один символ? В) Унарная;
2)Устройство, обеспечивающее обмен информацией с контроллерами периферических устройств, называется: Г) PCI-шина.
3). Какой из тегов HTML рисует горизонтальную линию? hr
4) Какой из перечисленных языков программирования относится к низкоуровневым? Г) Assembler.
5)Файлы с расширением .cvs используют для хранения: Г) Изображений.
6)Файл размером 2000 Кбайт передаётся через некоторое соединение в течение 30 секунд. Определите размер файла (в Кбайт), который можно передать через это соединение за 12 секунд. Пропорция 2000Кбайт / 30с * 12с = 800Кбайт А) 800 Кбайт;
7)Переведите число 126 из десятичной системы счисления в двоичную систему счисления. А) 1111110;
8)Укажите, что в электронных таблицах не применяется в формулах для ссылки на другие ячейки: А) Гиперссылка;
1)Назовите систему, в которой для записи любых чисел используется всего один символ? В) Унарная;
2)Устройство, обеспечивающее обмен информацией с контроллерами периферических устройств, называется: Г) PCI-шина.
3). Какой из тегов HTML рисует горизонтальную линию? hr
4) Какой из перечисленных языков программирования относится к низкоуровневым? Г) Assembler.
5)Файлы с расширением .cvs используют для хранения: Г) Изображений.
6)Файл размером 2000 Кбайт передаётся через некоторое соединение в течение 30 секунд. Определите размер файла (в Кбайт), который можно передать через это соединение за 12 секунд. Пропорция 2000Кбайт / 30с * 12с = 800Кбайт А) 800 Кбайт;
7)Переведите число 126 из десятичной системы счисления в двоичную систему счисления. А) 1111110;
8)Укажите, что в электронных таблицах не применяется в формулах для ссылки на другие ячейки: А) Гиперссылка;
//NaaMan
var i:integer;
begin
for i:=1 to 100 do
if (i mod 4 =1) or (i mod 4=2) then write(i,', ');
writeln;
end.