Информатика 9 PascalABC.NET Приведите общую характеристику языка Паскаль. Какова структура программы на Паскале?

👇

Ответ:

таня43564

22.03.2020

Один из самых популярных языков программирования высокого уровня - язык Паскаль (англ. Philips Automatic Sequence Calculator) был разработан швейцарским ученым Никлаусом Виртом в 1969 году как учебный язык, но спустя некоторое время приобрел популярность как отличный инструмент для решения серьезных задач. Программирование на Паскале обеспечивает высокую надежность программ. Программы на Паскале понятны любому программисту и в то же время они легко транслируются в эффективные машинные коды. Паскаль, наряду с Бейсиком, считается также учебным языком; он принят во многих учебных заведениях как базовый язык для изучения программирования. Так, в США с 1983 года Паскаль введен в учебные курсы всех средних школ для учащихся, специализирующихся в области информатики.

По мере своего развития язык Паскаль постоянно совершенствовался и приобретал новые свойства.

Структура простой программы на языке Паскаль включает в себя:

а) название программы, начинающееся с зарезервированного слова program и имени, состоящего из букв латинского алфавита и цифр. Турбо-Паскаль позволяет опускать объявление program, поэтому данная строка является необязательной. Однако использование слова program является признаком хорошего стиля программирования. Кстати, Среда программирования автоматически присваивает имя, идущее за словом program, файлу с исходным текстом (первые 8 символов);

б) определение меток, начинающееся с зарезервированного слова Label и перечисления через запятую используемых в программе меток, представляющих собой любые цифры от 1 до 9999 или символьные имена;

в) определение констант, начинающееся с зарезервированного слова Const и перечисления используемых в программе констант с присвоенными им именами, знаками = и их значениями и отделяемыми друг от друга точкой с запятой. Типизированные константы также объявляются после слова const, но имена через двоеточие связываются с типом, и лишь потом ставится знак равенства, и указываются значения. В связи с этим секция «const» может повторяться после секции type;

г) определение типов, начинающееся с зарезервированного слова Type и состоящее из перечисления через точку с запятой имен типов, вводимых пользователем, с пояснением через знак равенства (=), от каких базовых типов и как они происходят;

д) описание переменных, начинающееся с зарезервированного слова Var и перечисления используемых в программе переменных с указанием их типа. При этом имена переменных одного и того же типа, могут перечисляться через запятую, с указанием в конце записи после двоеточия их типа, а имена переменных разных типов описываются отдельно и отделяются друг от друга точкой с запятой. В языке Турбо-Паскаль все используемые в программе переменные должны быть объявлены. Это значит, что, во-первых, в начале каждой программы Вы должны привести список всех используемых переменных, а во-вторых, указать тип каждой из них;

е) описание процедур и функций, начинающихся с зарезервированного слова Procedure и имени процедуры или с зарезервированного слова Function и имени функции. В раздел описания каждой процедуры и функции могут входить все перечисленные выше разделы, а также раздел операторов, составляющий непосредственно сами процедуры и функции;

ж) раздел операторов, начинающийся с зарезервированного слова begin и кончающийся зарезервированным словом end и включающий в себя непосредственно весь процесс вычислений. Зарезервированные слова begin и end отмечают начало и конец программы. Они применяются также для того, чтобы объединить несколько операторов программы в составной оператор или “блок” (подробнее о составном операторе см. в теме № 2). После последнего слова end в программе ставится точка, указывающая на ее конец. При этом все, что набрано после слова end с точкой (end.), компилятором игнорируется.

Порядок разделов описаний может быть любым. Разделы друг от друга отделяются точкой с запятой. Раздел операторов является основным в программе. Все другие разделы, кроме раздела операторов могут отсутствовать. Операторы друг от друга отделяются точкой с запятой. В конце раздела операторов после ключевого слова end обязательно ставится точка, которая является признаком конца записи программы.

При записи программы на каждой строке можно писать либо по одному, либо по несколько операторов. Запись оператора можно начинать в любом месте строки. Ее можно продолжить на следующую строку, не разрывая имен констант, переменных, типов и символов. Кроме того, можно использовать пустые строки, чтобы отделить одну часть программы от другой.

Для записи исходных данных также можно использовать до 126 позиций строки. Числовые значения данных записываются на строке, отделяя одно от другого пробелами.

Объяснение:

4,4(75 оценок)

Открыть все ответы

Ответ:

MrDackes

22.03.2020

1. Вот так это пишется с функцией

// PascalABC.NET 3.1, сборка 1200 от 13.03.2016
function IsPrime(n:integer):boolean;
begin
if n<4 then Result:=True
else begin
    var found:= (n mod 2 = 0);
    var p:=3;
    while (not found) and (sqr(p)<=n) do
      begin
      found:=(n mod p = 0);
      p+=2
      end;
    Result:=not found
    end
end;

begin
Writeln('k=',ArrRandom(ReadInteger('n='),1,999).Println.
    Where(x->IsPrime(x)).Count)
end.

Тестовое решение:
n= 10
401 828 780 444 694 965 23 341 673 875
k=3

2. А вот так это пишется с процедурой

// PascalABC.NET 3.1, сборка 1200 от 13.03.2016
procedure IsPrime(n:integer; var res:boolean);
begin
if n<4 then res:=True
else begin
    var found:= (n mod 2 = 0);
    var p:=3;
    while (not found) and (sqr(p)<=n) do
      begin
      found:=(n mod p = 0);
      p+=2
      end;
    res:=not found
    end
end;

begin
var a:=ArrRandom(ReadInteger('n='),1,999); a.Println;
var k:=0;
var prime:boolean;
foreach var e in a do begin
    IsPrime(e,prime);
    if Prime then Inc(k)
    end;
Writeln('k=',k)
end.

Тестовое решение:
n= 12
199 43 71 365 417 904 170 212 694 103 161 689
k=4

4,8(69 оценок)

Ответ:

Aurusu

22.03.2020

// тестировалось на C#.Net Framework 4.5
using System;

class Program
{
   static void Main()
   {
       int x1 = 2, y1 = 1;
       int x2 = 6, y2 = 5;
       int x3 = 10, y3 = 1;

       var a = Distance(x2, y2, x3, y3);
       var b = Distance(x1, y1, x3, y3);
       var c = Distance(x2, y2, x1, y1);


       Console.WriteLine("S = {0}", Square(a, b, c));
       Console.ReadKey();
   }

   //растояние между точками
   static double Distance(int x1, int y1, int x2, int y2)
   {
       return Math.Sqrt((x2 - x1) * (x2 - x1) + (y2 - y1) * (y2 - y1));
   }

   //формула герона
   static double Square(double a, double b, double c)
   {
       var p = (a + b + c) / 2;
       return Math.Sqrt(p * (p - a) * (p - b) * (p - c));
   }

   // теорема косинусов
   static double Angle(double a, double b, double c)
   {
       return Math.Acos((b * b + c * c - a * a) / (2 * b * c));
   }

   static bool IsAcuteAngel(double alpha)
   {
       return alpha < Math.PI / 2;
   }
}

4,6(77 оценок)

Это интересно:

Компьютеры-и-электроника

17.05.2021

Mac и внешний жесткий диск: как загрузить компьютер...

Дом-и-сад

16.01.2020

Как удалить сажу с окрашенных поверхностей...

Хобби-и-рукоделие

22.07.2021

Как сделать флаг: простой шаг за шагом гид...

Здоровье