dmtr77
?>

Как открыть новое окно программы?1 Как сохранить новый текст программы?3. Как проверить текст программы на ошибки?4 Что такое компиляция программы?Как «запустить» программу?« Назовите оператор вывода в Turbo Pascal.7. Назовите оператор ввода в Turbo Pascal.​

Информатика

Ответы

Dmitrievich1871

1. – выбрать меню «File \ Change dir…» (Файл \ Сменить директорию) и указать диск и каталог, в который следует сохранить текст программы;

– выбрать меню «File \ Save as…» (Файл \ Сохранить как) и ввести имя файла в полеSave file as(по умолчанию Turbo Pascal устанавливает имя NONAMExx.PAS; необходимо указать другое наименование файла, используя при этом англоязычные символы);

3. Запустить программу и посмотреть, нет ли ошибок при компиляции

4. Компиляция - трансляция программы, составленной на исходном языке высокого уровня, в эквивалентную программу на низкоуровневом языке, близком машинному коду

5.Ctrl + F9

6. Write

   Writeln

7. Read

   Readln

Gavrilova2527
// PascalABC.NET 3.0, сборка 1157 от 02.02.2016
begin
  var a:array[1..20] of integer;
  Randomize;
  for var i:=1 to 20 do a[i]:=Random(-50,50); a.Println;
  var b:=Range(2,20,2).Select(i->a[i]);
  Writeln('Элементы с четными индексами по возрастанию');
  b.Sorted.Println;
  Writeln('Элементы с четными индексами по убыванию');
  b.SortedDescending.Println;
end.

Тестовое решение:
-15 46 -34 -3 43 16 -17 -28 -19 12 -28 -11 48 -12 -1 33 -37 9 6 -40
Элементы с четными индексами по возрастанию
-40 -28 -12 -11 -3 9 12 16 33 46
Элементы с четными индексами по убыванию
46 33 16 12 9 -3 -11 -12 -28 -40
Yevgeniya1807
Var
 x,a,b,c,max,min,mid:real;
begin
 readln(x);
 a:=sin(x);
 b:=cos(x);
 if a>0 then
  begin
   c:=ln(x);
   if (a>b) and (a>c) then max:=a else
   if (b>a) and (b>c) then max:=b else max:=c;
   if (a<b) and (a<c) then min:=a else
   if (b<a) and (b<c) then min:=b else min:=c;
   if (a>min) and (a<max) then mid:=a else
    if (b>min) and (b<max) then mid:=b else mid:=c;
   writeln(min,' ',mid,' ',max);
  end
 else
  if a>b then writeln(b,' ',a) else writeln(a,' ',b);
end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Как открыть новое окно программы?1 Как сохранить новый текст программы?3. Как проверить текст программы на ошибки?4 Что такое компиляция программы?Как «запустить» программу?« Назовите оператор вывода в Turbo Pascal.7. Назовите оператор ввода в Turbo Pascal.​
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Aleksei806
zsa100
kav511
diannaevaaa
uchpapt
inulikb
zakaz
Salko17
AkulovaAnastasiya
Vipnikavto58
Lebedeva1577
ViktorovnaKraeva634
gaydukov5706
timonina29
sdy19576216