Var a: byte;
begin
writeln('Введите номер месяца:');
readln(a);
case a of
1, 2, 12: writeln('Зима');
3..5: writeln('Весна');
6..8: writeln('Лето');
9..11: writeln('Осень')
else writeln('Ошибка');
end;
end.
Алг Число
нач
цел n,a,b,c,d
ввод n
a:=mod(n,10);
n:=div(n,10);
b:=mod(n,10);
n:=div(n,10);
c:=mod(n,10);
n:=div(n,10);
d:=n;
вывод "Сумма цифр числа = ", a+b+c+d;
вывод " Произведение цифр числа = ",a*b*c*d;
кон
1мб=1048576 байтов
1048576:4=262144 байт
1 Алгоритмом шифрования и сжатия информации.
2 Растровые файлы обычно многоцветны и большие (фото, сканы), поэтому в несжатом виде занимают много места
3 JPEG, GIF, BMP (с сомнениями), GIF и PNG
4 Одна из программ не подчиняется стандартам формата.
5 Изменением палитры цветов и размера изображения.
6. Растр BMP GIF TIFF PCX
Вектор CDF WMF
Смешанные PSD EPS
Другое DXF