Все категории

3 года назад

Посмотрите плиз у нас правильно??))

Знания

Информатика

2 ответа:

nionila3 года назад

0 0

Что именно у вас правильно?

AlexSilver [14]3 года назад

0 0

Все правильно) ///////////

Читайте также

Напишите программу, которая вводит натуральное число N и выводит на экран все натуральные числа, не превосходящие N и делящиеся

Doch Severa [110]

Var n,i,t,p:integer;
begin
readln(n);
for i:=2 to n do begin
t:=i;
p:=1;
repeat
p:=p*(t mod 10);
t:=t div 10;
until t=0;
if (p<>0)and(i mod p=0) then write(i,' ');
end;
end.

0 0

3 года назад

Переведите числа в десятичную систему счисления а) 1001011^2б)342^8в)2B7^16

aleferov

1) 75

2)226

3)695

Жду лайкосики и удачив информатике))

0 0

3 года назад

При работе с электронной таблицей в ячейку C3 записана формула:=$A4+C3. Какой вид преобрете формула,после того как ячейку C3 ско

Fadey [3]

Ответ: С2= $А3+ С2.

0 0

4 года назад

Помогите плс написать команды в паскале. Сделать надо номер 2 и 3

uuu8888uuu [152]

Ответ:

Объяснение:

program uravn;

var x,y:real;

begin

writeln('Введите х');

readln(x);

y:=x+2.5;

y:=y*x;

y:=y-1;

y:=y*x;

y:=y+1;

writeln('y=',y:4:2);

readln;

end.

program rasst;

var

d,xa,ya,xb,yb:real;

begin

writeln('Введите координаты точек А(xa,ya), В(xb,yb)');

write('xa=');

readln(xa);

write('ya=');

readln(ya);

write('xb=');

readln(xb);

write('yb=');

readln(yb);

d:=sqrt(sqr(xb-xa)+sqr(ya-yb));

writeln('|AB|=',d:4:2);

readln;

end.

0 0

4 года назад

Напишите два варианта программы(2 не обязательно),которая вводит координаты на плоскости и определяет,попала ли эта точка в зашт

Марина Даньшина

Var X,Y:real;
Begin
Write('X = ');Read(X);
Write('Y = ');Read(Y);
if (X*X+Y*Y=1)or( (X>=0)and(Y>=0)and(X<=1)and(Y<=1) ) then Write('Попала')
else Write('Мимо')
End.

0 0

4 года назад