Ввести номер месяца и номер дня, вывести число дней, оставшихся до нового года. пример: введите номер месяца 12 введите день 25 до нового года осталось 6 дней. p.s.: надо постараться использовать if, while, repeat, until, div mod, case of (не обязательно использовать все из этого)

Без "if, while, repeat, until, div mod, case of" получается короче и проще:
const 
days:array[1..12]of integer=(31,28,31,30,31,30,31,31,30,31,30,31);
var m,d,k,i:integer;
begin
writeln('Введите номер месяца');
readln(m);
writeln('Введите день');
readln(d);
k:=0;
for i:=1 to m-1 do k:=k+days[i];
k:=365-k-d;
writeln('До Нового года осталось ' ,k,' дней (день/дня)');
end.

Пример:
Введите номер месяца
12
Введите день
25
До Нового года осталось 6 дней (день/дня)

Паскаль.

 

Немного не понятно: от 1 до 10  это относится только к нечетным числам или ко всем? Ну напишу программу которая просто все числа вычисляет, если сама не сможешь поставить условие ограничения, то сообщи точное условие задачи и напиши мне в личку

 

program jjj;

var a: array [1..10] of integer; i,summa,proizv:integer;

begin

for i:=1 to 10 do begin

   Writeln('напишите элемент массива номер ',i); read(a[i]);

                        end;

For i:=1 to 10 do begin

                              if a[i] mod 2=0 then summa:=summa+a[i] else

                                                       proizv:=proizv*a[i];

                         end;

Writeln(summa,'   ',proizv); readln;

end.

1. Основной принцип - есть бумага, есть множество иголочек, а между ними - красящая лента как в печатной машинке. Ударяя по бумаге через ленту, иголочки оставляют на ней следу от краски, так и формируются изображения.
2. Плюсы:
- дешевизна
- неприхотливость комплектующих
- простота обслуживания
- могут работать в сложных условиях.
Минусы:
- шум
- низкая разрешающая
- одноцветность
- маленькая скорость печати
- образование при печати пыли от краски на ленте.
Применяются обычно там, где либо нет смысла тратиться на нечто более сложное и дорогое, либо там, где важно чтобы по оттискам на бумаге можно было проверить, оригинал ли это (чеки например): в банках и кассах в основном.

1. Термопринтер - печатает на специальной бумаге, нагревая рисунок на барабане, по которому та прокатывается. Бумага покрыта специальным слоем, который темнеет при нагревании.
2. Плюсы:
- тихие
- быстрые
- большой ресурс
- не нужна замена красящих элементов (их нет)
- простота обслуживания
минусы:
- одноцветные
- дороговизна специальной бумаги
- отпечатки со временем исчезают с бумаги (выцветают).
Применяются в основном на кассах магазинов, где главное - возможность печатать долго и быстро.