Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program srednball;
var a,b,d : integer;
c : real;
begin
writeln (' vvedite balli, nabrannie sportsmenom po 3 vidam sporta');
readln (d);
readln (a);
readln (b);
c: =(a+b+d)/3;
writeln (' srednii ball= ', c: 4: 2);
readln;
end.
количество кбайт умножаете на 1024 получаете количество символов 3,5*1024=3584
24 * 32 = 768 символов на 1 странице
768 * 12 = 9216 символов на 1 странице
9216 * 1 = 9216 байт в буклете
9216 * 8 = 73728 бит в буклете
как я понял тебе нужна программа которая просто выводит на экран нужный тебе текст
вот она
program ohotnik;
uses crt;
var i: integer;
clrscr;
textcolor(4);
write(' ka}i{gbiu ');
textcolor(12);
write(' oxothuk ');
textcolor(14);
write(' }i{ejiaet ');
textcolor(2);
write(' 3hatb ');
textcolor(3);
write(' rge ');
textcolor(1);
write(' cug9t ');
textcolor(5);
write(' fa3ahbi ');
зы: слова я пытался писать буквами, я не знаю просто: поддерживает твой паскаль буквы или нет..
Популярные вопросы