INPUT a$FOR i = 1 TO LEN(a$) b$ = MID$(a$, i, 1) IF i = LEN(a$) THEN ELSE h$ = h$ + b$ + "-" END IFNEXT iPRINT h$ + b$
A , B = int (input()) , int (input())
for i in range (A,B+1):
print (i**2)
Var p: array[1..12] of integer;
begin
var min: integer;
var max: integer;
randomize;
for var i := 1 to 12 do p[i] := random(100);
min := p[1];
max := p[1];
for var i:= 1 to 12 do if p[i] < min then min := p[i];
for var i:= 1 to 12 do if p[i] > max then max := p[i];
writeln(max/min);
end.
1. Шиной (магистралью)
Плоттер-устройство печати
Модем-устройство меняющий аналоговую информацию в цифровую и обратно
Контроллер -регулятор, управляющий элемент
1 байт=8 бит
1КБ = 1024 байта
<span>1МБ=1024 КБ</span><span> 1 </span>килобайт<span> = 1 000 </span><span>байт
</span>