Program Zadacha;
var
x, y: real;
Begin
Write('Enter x, y ');
ReadLn(x, y);
WriteLn(x, ' + ', y, ' = ', x+y);
WriteLn(x, ' - ', y, ' = ', x-y);
WriteLn(x, ' * ', y, ' = ', x*y);
WriteLn(x, ' / ', y, ' = ', x/y);
ReadLn;
End.
Сверху в меню: Вставка -> Фигуры -> Линия(вверху должна быть). И делаете себе линию какую хотите :)
Информатика - наука об информации и автоматизации информационных процессов.
Информация - это новости, новые факты, знания про объекты и явления окружающей среды.
Компьютер - <span>устройство или система, способное выполнять заданную </span><span>чётко определённую изменяемую последовательность операций.
</span><span>Файл - это упорядоченная совокупность данных на внешнем носителе которая имеет имя которое операционная система обрабатывает как единое целое.
</span>Текстовой редактор - это <span>самостоятельная компьютерная программа или </span><span>компонент программного комплекса.
</span>Графический редактор - это <span>программа позволяющая </span><span>создавать, просматривать, обрабатывать и редактировать цифровые </span><span>изображения на компьютере.</span>
<em>// PascalABC.NET 3.3, сборка 1590 от 03.12.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ArrRandom(ReadInteger('n='),-99,99); a.Println;
var imin:=a.IndexMin;
var b:=a[:imin]; b.Println;
var c:=a[imin:]; c.Println
end.
<u>Пример</u>
n= 17
98 34 -59 -23 -65 -46 -15 -88 31 48 13 -7 70 -8 -69 65 -65
98 34 -59 -23 -65 -46 -15
-88 31 48 13 -7 70 -8 -69 65 -65