Задание №1
1А. A := -5.7 - вещественная
1B. D := True - логическая
1C. C := 105 - целая
1D. D := 'Hello' - строковая
Задание №3
P = 11.4
A = 2.7
В = 3
P и A - точно Real
B - по логике задачи тоже должно быть Real: стороны вводятся в виде вещественных чисел, хотя ее можно объявить и как Integer, тогда при вычислении будет сделано преобразование к одному типу - Real
Const n =5;
var
a:array[1..n] of integer;
i,max:integer;
begin
writeln('Введите 1 элемент массива');
readln(a[1]); max:=a[1];
for i:=2 to n do begin
writeln('Введите ', i,' элемент массива');
readln(a[i]);
if a[i]>max then max := a[i];
end;
writeln('Максимальный элемент массива равен ',max);
end.
Тестовое решение:
Введите 1 элемент массива
21
Введите 2 элемент массива
56
Введите 3 элемент массива
12
Введите 4 элемент массива
24
Введите 5 элемент массива
15
Максимальный элемент массива равен 56
Командный интерфейс - особенность: работает только с командами, нет графики
Графический интерфейс - особенность: графически-обустроенный интерфейс
Объектно-ориентированный интерфейс - особенность: объединение двух графический интерфейсов | преимущества: легок в управлении
1. Андреев из Екатеринбурга;
Борисов из Перми;
Васильев из Омска;
Григорьев из Челябинска;
Данилов из Новосибирска.
2. 165234.
3. 461325.
4. 32415
Решение приведено во вложениях. Непонятен смысл второго задания, потому что первое фактически его включает.