Ну во-первых блокнот, это чистый текстовый редактор. (Вы не можете в нём вставлять картинки, рисовать схемы).
А что вы имели под поинтом? PowerPoint? Если её, то это программа для создания презентаций, в неё можно вставлять и музыку, видео и картинки.
Если вы хотели сказать Paint, то это графический редактор. В нём вы можете передавать информацию посредством рисования и написания текста на изображении (в блокноте этого делать нельзя). <span />
Var a, b, answer: integer;
function gcd(m, n: integer): integer;
var modulo: integer;
begin
modulo := m mod n;
if modulo = 0 then gcd := n
else gcd := gcd (n, modulo) end;
begin
write('Введите 2 числа: '); readln(a, b);
answer := gcd(a, b);
writeln('Наибольший общий делитель: ', answer);
<span>end.</span>
128 бит=16 байт
40960=5 кбайт
875байт=7000 бит
1,5кбайт=1536 байт
2мбайты=2048 кбайт
1,5мбайт=1572864 байт
1/16мбайт=9730785,28 бит
315.1875(10)=100111011.0011(2)
315.1875(10)=473.14(8)
315.1875(10)=13B.3(16)
Program zadanie;
Var a,b,c,n:real;
Begin
Writeln('Задайте число');
Readln(n);
Writeln('Введите 3 числа, больше заданного');
Readln(a,b,c);
If (a>n) and (b>n) and (c>n) Then
begin
a:=a*b*c;
Writeln('Произведение 3-х вводимых чисел=',a);
end
Else Writeln('Неверно введены числа');
End.
and-логическое "и"