Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program xxx;
var i, n : integer;
begin
write ('введите число n-');
readln (n);
writeln('делители числа: ');
for i : =1 to n do
if n mod i = 0 then writeln (i)
end.
стандартный программе просмотра изображений и факсов не сохраняет в других форматах.
потому лучше открыть paint или любой другой просмотрщик или графический редактор
просто открыть в нем нужную картинку и файл-сохранить как(в новом окошке внизу в списке выбрать формат)
о форматах написано много в интернете.
если хотите пошаговую инсрукцию, то присоединяйте картинки и табличку, а то так не ясно че делать
var h,a: integer;
a: =1;
repeat
h: = h+3;
a: =2*a;
writeln('прошло часов - ',h,', амеб - ',a)
until h> =30;
readln;
переведем информационный объем сообщения из килобайт в биты:
i = 1.5*1024*8=12288.
i=3 (2^3=8) бита приходится на один символ:
к=i/i=12288/3=4096 символов.
ответ: 4096 символов.
Популярные вопросы