<span>Тактовая частота процессора — это частота синхронизирующих импульсов синхронной электронной схемы, которые поступают из вне на вход схемы за одну секунду. Иными словами, это то количество операций, которое выполняется процессором за одну секунду. При этом этом важно не забывать, что процессоры с одной тактовой частотой могут иметь различную производительность, поэтому для выполнения одной операции различным системам требуется разное количество тактов.</span>
1) var i,n: Integer;
begin
i:=0;
writeln('Введите число');
readln(n);
while i<>n do
begin
Inc(i);
writeln(i);
end;
end.
2) var i,n,x,count: Integer;
begin
writeln('Введите кол-во цифр');
readln(n);
for i:=1 to n do
begin
writeln('Введите ',i,' число');
readln(x);
Inc(count,x);
end;
writeln('Сумма чисел: ',count);
end.
...
begin
readln(a);
c:=amod10;
a:=adiv10; k:=1;
while a>0 do begin
d:=amod10;
if d=c then inc(k);
a:=adiv10;
end;
writeln(k);
end.
begin
var x: integer;
var s: integer;
var Count := 0;
repeat
if not TryRead(x) then
begin
Writeln('This is not the integer number, try again');
continue
end;
s += x;
Count += 1;
until x = 0;
Println('Average =', s / (Count - 1))
end.