М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
AsiyaEkb
AsiyaEkb
18.05.2021 23:23 •  Информатика

Можно ли отменить перемещение листа в другую книгу? в excel

👇
Ответ:
Nutmi
Nutmi
18.05.2021
"отменить действие" не на всех компах работает, но бывает. (стрелочка в левом верхнем углу)
4,8(52 оценок)
Открыть все ответы
Ответ:
pip2281
pip2281
18.05.2021

Program pryam;

Var y1, y2, y3, x1, x2 : real;

Begin

  writeln ('Введите координату (у) верхней точки прямой');

  readln (y1);

  writeln ('Введите координату (у) нижней точки прямой');

  readln (y2);

  writeln ('Введите координату (х) точек-концов прямой');

  readln (x1);

  writeln ('Введите координату (у) точки, принадлежность к прямой которой нужно определить');

  readln (y3);

  writeln ('Введите координату (х) точки, принадлежность к прямой которой нужно определить');

  readln (x2);

if (y3<=y1) and (y3>=y2) and (x2=x1) then writeln (' принадлежит ')

else writeln (' не принадлежит ');

readln;

End.

4,6(68 оценок)
Ответ:
kuku2s
kuku2s
18.05.2021
Program asd;
Var A,C:array[1..2500] of integer;
i,n,s,ii:integer;
 sr:real;
BEGIN
Write('Введите n: '); Readln(n);
Writeln('Массив: ');
 For i:=1 to n do
  begin
  A[i]:=1+Random(9); 
 Write(A[i]:2); 
  end;  
 Writeln; 
 Writeln('Все элементы, которые меньше последнего числа в ряду: ');
For i:=1 to n do  
begin
 if A[i]<A[n] then Write(A[i]:2); 
end; 
Writeln;
 Writeln('Среднее арифметическое элементов массива: '); 
 For i:=1 to n do 
 begin 
 s:=s+A[i]; 
 sr:=s/i; 
end; 
Writeln(sr:2:2);  
   Writeln('Номер элементов, которые от 3 до 7.: ');  
  For i:=1 to n do 
 begin 
 If  (A[i]>=3) and (A[i]<=7)   
 then
  begin 
  C[i]:=i; 
 Write(C[i],' '); 
 end;   
 end;  
END.
4,6(21 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ