Базовые типы данных. Ввод и вывод. Арифметические операции. (PascalABC.NET): различия между версиями

Материал из Информационная безопасностя
Перейти к навигации Перейти к поиску
 
(не показано 8 промежуточных версий этого же участника)
Строка 1: Строка 1:
 +
{{TOCRight}}
 
== Базовые типы данных ==
 
== Базовые типы данных ==
<syntaxhighlight lang="c" line>
+
* [http://pascalabc.net/downloads/pabcnethelp/index.htm?page=LangGuide/Types/index_types.html Типы данных (документация)]
 +
 
 +
<syntaxhighlight lang="pascal" line>
 
var
 
var
 
   height: integer := 176;
 
   height: integer := 176;
Строка 11: Строка 14:
  
 
== Ввод и вывод ==
 
== Ввод и вывод ==
<syntaxhighlight lang="c" line>
+
* [http://pascalabc.net/downloads/pabcnethelp/index.htm?page=LangGuide/PABCSystemUnit/Files/Read%20subroutines.html Подпрограммы ввода (документация)]
 +
* [http://pascalabc.net/downloads/pabcnethelp/index.htm?page=LangGuide/PABCSystemUnit/Files/Write%20subroutines.html Подпрограммы вывода (документация)]
 +
 
 +
<syntaxhighlight lang="pascal" line>
 
program Test;
 
program Test;
 
var
 
var
Строка 23: Строка 29:
  
 
== Арифметические операции ==
 
== Арифметические операции ==
<syntaxhighlight lang="c" line>
+
* [http://pascalabc.net/downloads/pabcnethelp/index.htm?page=LangGuide/Types/index_types.html Комплексный оператор присваивания (документация)]
 +
<syntaxhighlight lang="pascal" line>
 
program Test;
 
program Test;
 
var
 
var
Строка 30: Строка 37:
 
     Writeln('Введите температуру в градусах цельсия:');
 
     Writeln('Введите температуру в градусах цельсия:');
 
     Readln(celcius);
 
     Readln(celcius);
 +
    // var celcius := ReadReal('Введите температуру в градусах цельсия:');
 
     fahrenheit := celcius*1.8 + 32;
 
     fahrenheit := celcius*1.8 + 32;
 
     Writeln(celcius, '.000 C = ', fahrenheit:7:3, ' F');
 
     Writeln(celcius, '.000 C = ', fahrenheit:7:3, ' F');
 
end.
 
end.
 
</syntaxhighlight>
 
</syntaxhighlight>
 +
 +
== Задачник ==
 +
* [http://ptaskbook.com/ru/tasks/begin.php Ввод и вывод данных, оператор присваивания]

Текущая версия на 09:53, 9 июня 2021

Базовые типы данных

1 var
2   height: integer := 176;
3   loanPercentage: real := 8.9;
4   age: array[1..5] of integer = (3,15,21,7,36);
5   name: string;
6   c: char;
7   busy: boolean;

Ввод и вывод

1 program Test;
2 var
3   age: integer;
4 begin
5   Writeln('Please enter your age:');
6   Readln(age);
7   Writeln('Age = ' + age);
8 end.

Арифметические операции

 1 program Test;
 2 var
 3     celcius, fahrenheit: real;
 4 Begin
 5     Writeln('Введите температуру в градусах цельсия:');
 6     Readln(celcius);
 7     // var celcius := ReadReal('Введите температуру в градусах цельсия:');
 8     fahrenheit := celcius*1.8 + 32;
 9     Writeln(celcius, '.000 C = ', fahrenheit:7:3, ' F');
10 end.

Задачник