Ответ:MS PowerPoint, Mozilla Firefox, Grins, notepad++, inkscape,
Объяснение:
1) - в
2) - а
3) - е
Не уверен, но по моему так
Begin
writeln(ord('Б')+ord('А')+ord('Й')+ord('Т'));
end.
var a : array [1..3,1..4] of integer;
i,j,k:integer;
begin
for i:=1 to 3 do
begin
for j:=1 to 4 do
begin
a[i,j]:=random(90)+10;
write(a[i,j]:4);
if a[i,j] mod 2=0 then k:=k+1
end;
writeln;
end;
writeln('Количество четных элементов массива: ',k);
end.
program HelloWorld;
var k:integer;
begin
writeln('Введи сторону');
readln(k);
writeln(k*k)
end.