Метод-координат.
вот твой вопрос???
............
var
x,x1:integer;
begin
readln(x);
if (x div 10 + x mod 10 >= 10) then writeln ('Является')
else begin x1:=x; while (x1 div 10 + x1 mod 10 < 10) do x1:=x1+1; end;a
if (x div 10 + x mod 10 < 10) then writeln('Нужно увеличить на ',x1-x);
end.
Ответ:
1.99
Объяснение:
Начнем с того, что 128000 бит - это 125 килобайт.
Если модем передает 249КБ, то нужно, согласно калькулятору, 1.992 секунды. А вообще, я бы накинул еще немного времени из-за задержки, как раз до двух секунд или около того.
x = input("Введити любое число: ")
x = float(x)
if x<0:
y =x*3
elif x>0:
y=x+5
else:
y=7
print("y=",y)
Пример:
Введити любое число: 7
y= 12.0
program raf105;
var i,pro: integer;
begin
pro:= 1;
for i:=1 to 9 do
if (i mod 3)=0
then pro:= pro * i;
writeln(pro);
end.
<h3><em><u>Язык PascalABC</u></em></h3>