В каких облочных приложениях можно создать, отредактировать таблицу или текстовый документ.​

1.Отметьте допустимые идентификаторы знаком«+»,а недопустимые знаком «-»
+ 1) RAZMER
+ 2)_Beta
- 3) 5 ABC
+ 4) Y22M

2. Подберите подходящий тип данных:
a) Количество учеников в классе – integer, word, byte
b)Заработанная плата сотрудника фирмы- real, double
c) Фамилия сотрудника фирмы – string

3.Запишите арифметические выражения на языке программирования Паскаль:
a) ac-b+xyz  = a*c-b+x*y*z;
в) a*x^2+b*x+c = a*x*x+b*x+c;
c) (a-b)x+3/y+z = (a-b)*x+3/(y+z);

4) Напишите инструкцию вывода на экран:
а) Вашего имени = write('Ваше имя');
В) Число 400 = write(400);
С) Значение выражения x+y = write(x+y);

Задача №1

var a:array[1..3, 1..4] of integer; 
i,j,min:integer; 
begin 
for i:=1 to 3 do 
for j:=1 to 4 do begin 
read(a[i,j]); 
if a[i,j]<0 then min:=a[i,j]; 
end; 
for i:=1 to 3 do 
for j:=1 to 4 do 
if (a[i,j]<0) and (a[i,j]<min) then min:=a[i,j]; 
writeln('Минимальное отрицательное число ',min); 
end.

Задача №2
var a:array[1..2, 1..5] of integer; 
i,j:integer; 
begin 
for i:=1 to 2 do 
for j:=1 to 5 do read(a[i,j]); 
for i:=1 to 2 do begin 
for j:=1 to 5 do 
write(a[i,j],' '); 
writeln; 
end; 
end. 

Задача №3
var a:array[1..3, 1..4] of integer; 
i,j:integer; 
begin 
for i:=1 to 3 do 
for j:=1 to 4 do read(a[i,j]); 
for i:=1 to 3 do 
for j:=1 to 4 do 
if a[i,j]=10 then writeln('Номер столбца — ',j,' Номер строки — ',i); 
end.