Имя файла - Информатика.doc, но можно написать и просто Информатика, но вообще имя файла состоит из двух частей, а именно имени файла и расширения, в данном случае имя файла - Информатика, расширение - doc.
Карпец Д. К.
1
А с муз. файлом не знаю))
B⇒C (2);
C⇒D (2);
D⇒A (1);
A⇒E (4);
2+2+1+4=9;
Ответ: (3).
Var a:array [1..10] of integer;
i,k1,k2:integer;
begin
for i:= 1 to 10 do
a[i]:= Random(20,100);
writeln(a);
for i:=1 to 10 do
if a[i] mod 2 = 0 then k1:=k1+1
else k2:=k2+1;
writeln('Чётных элементов: ',k1);
writeln('Нечётных элементов: ',k2)
end.
Program zadacha;
var
a,b,c:real;
begin
read(a,b,c);
if ((a + b) > c) and ((a + c) > b) and ((c + b) > a) then
write('yes');
end.