Var
a,b:real;
Begin
Write('a = ');ReadLn(a);
Write('b = ');ReadLn(b);
WriteLn('S = ',a*b);
End.
Я думаю техническое так как автомобиль))
1)См рисунок,он из интернета,ибо я могу нарисовать,но будет криво(
2) путь от диска C:/ до файла. К примеру, файл информатика.docx в папке "Школа" на рабочем столе будет иметь такой путь: C:\Users\%username%\Desktop\Школа\информатика.docx. Это на виндовс
3)
C:\Участники
C:\Конференция\Участники
C:\Конференция\Регионы\Участники
C:\Конференция\Регионы\Списки\Участники
//PascalABC.NET
//Версия 3.3, сборка 1634
begin
var n:=ReadInteger;
var p:=1.0;
for var i:=1 to n do p:=p*i;
write(p);
end.