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

По трем введенным с клавиатуры сторонам необходимо выяснить является ли этот треугольник равносторонним.

👇
Ответ:
artemvershinin
artemvershinin
16.04.2020
Var a,b,c:real;
begin
  write('Введите длину 1 стороны: '); readln(a);
  write('Введите длину 2 стороны: '); readln(b);
  write('Введите длину 3 стороны: '); readln(c);
  if (a=b) and (b=c) then writeln('Равносторонний')
     else writeln('Не равносторонний или такого треугольника нет');
end.
4,8(65 оценок)
Открыть все ответы
Ответ:
Лёха1243232
Лёха1243232
16.04.2020
//Боль
//Pascal ABC.NET 3.1 сборка 1219

Var
 f:text;
 max,min,p:real;
 maxn,minn,n,i:integer;
 ar:array of real;
 s:string;
begin
max:=real.MinValue;
min:=real.MaxValue;
n:=0;
 assign(f,'text.txt');
 reset(f);
 while not(Eof(f)) do
  begin
   read(f,p);
   inc(n);
   setlength(ar,n);
   ar[n-1]:=p;
   if ar[n-1]>max then
    begin
     max:=ar[n-1];
     maxn:=n-1;
    end;
   if ar[n-1]<min then
    begin
     min:=ar[n-1];
     minn:=n-1;
    end;
  end;
 close(f);
swap(ar[minn],ar[maxn]);
for i:=0 to n-1 do
if i<>n-1 then s:=s+floattostr(ar[i])+' '
else
s:=s+floattostr(ar[i]);
rewrite(f);
write(f,s);
close(f);
end.

Пример содержимого text.txt:
0 -2.1 1.1
Пример содержимого text.txt после работы программы:
0 1.1 -2.1
4,4(42 оценок)
Ответ:
ulianaazet66
ulianaazet66
16.04.2020

1-шаг Запускаешь Microsoft office Word.

2-шаг-пишешь текст.

3-шаг - создание гиперссылки "Казахстан.ppt,,будет отправлять на PowerPoint

1. Выделить текст, который должен представлять гиперссылку.

2. Щелчок правой кнопкой мыши по выделенному тексту, на вкладке "Вставка" нажать кнопку "Гиперссылка".

3. В окне "Вставка гиперссылки" ввести или вставить ссылку ( в нашем случае - Казахстан.ppt ) в поле "Адрес".

Результат: После запуска текстового документа весь текст выделиться синим, если нажать на текст - запуститься Казахстан.ppt в Microsoft

Надеюсь

(Отметьте как лучший ответ)

4,4(76 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ