Выделить всё
копировать
вырезать
вставить
сохранить
отменить
Program konf;
var a, b, summ: real;
begin
a := 1.2;
readln(b);
while a < 2 do
begin
summ := a * b;
writeln(summ, ' za ', a);
a := a + 0.2
end;
<span>end.</span>
1) Ну ты можешь удаленно хранить информацию и делать все быстро и электронно
2)Не нарушать законы которые связаны с технологиями.Например на територий КЗ запрещена криптовалюта.
Var k,x,a:integer;
Begin
x:=100;
k:=0;
repeat
a:=x div 10;
if (x mod a)=0 then
begin
writeln(x);
k:=k+1;
end;
x:=x+1;
until k=70;
End.
Линз в колонках нет и быть не может. Линзы используются только в оптических приборах, например в проекторах