Срочно, помогите пожалуйста.
1) Напишите пожалуйста программу в Паскале ,которая бы содержала и функцию и процедуру одновременно в одной программе.
1) Напишите пожалуйста программу в Паскале ,которая бы содержала и функцию и процедуру одновременно в одной программе.
More Questions From This User See All
Answers & Comments
{Эта рабочая 100% :3}
var n: string;
procedure foo(str: string);
begin
writeln(str);
end;
function foo1(str: string): string;
begin
foo1:= str;
end;
begin
foo('I am a procedure');
n:= foo1('I am a function');
writeln(n);
end.
'I am a function' с помощью функции