1. Вкажіть можливий тип величини, якщо її значення набуває 2020:

a) Цілий

b) Логічний

c) Дійсний

d) Літерний
2.Для того, щоб на кнопці був напис «Розв’язання», потрібно написати таку команду:

a) Button1.text:=’Розв’язання’;

b)Button1.caption:=’Розв’язання’;

c) Label1.caption:=’кнопка’;

d) Button1.color:=clRed;
3.Відмітьте правильні оператори:

a) z:=79-z

b) a+b:=s

c) a:=a

d) 5:=2+3
4.Для зміни кольору фону форми потрібно написати команду:

a) Button1.form1:=red

b) Form.color:=clBlue

c) Label1.color:=’Зелений’

d) Form1.color:=clred
5.Розділ операторів програми починається зі службового слова:

a) And

b) var

Если то большое вам

1)это сведения или знания ,содержащие в сообщении.

2)естественные и формальные.

3)слух,зрение ,органы чувств.

4)с зрительных,слуховых и др. образов. в памяти.

5)с различных форм(письменные,устные или жестов)2 формы языка:естественные (разговорные),формальные(язык музыки(ноты),язык математики)

6) человеческое мышление ,органы чувств,теоритических знаний полученных в учебе.

7) процессы,связанные с получением ,хранением,обработкой и передачей информацией,называется информационными процессами.

Только что проходили :)

const n=3;
var
a: array[1..n, 1..n] of word;
i, j, max, MaxI, S: longint; {i и j -переменные для цикла, max - максимальный элемент, S - сумма, MaxI - номер строки, в которой расположен максимальный элемент}
begin
S:=0;
max:=0;
for i:=1 to n do
for j:=1 to n do
begin
writeln('Введите a[',i,', ', j, ']');
readln(a[i,j]);
if a[i, j]>max then
begin
max:=a[i, j];
MaxI:=i;
end;
end;//for
for j:=1 to n do s:=s+a[MaxI, j];
writeln('Сумма элементов строки, в которой расположен максимальный элемент равна ', S);
end.