Переведите пожалуйста с С++ ** Pascal #include using namespace std; void func...

Question

Переведите пожалуйста с С++ на Pascal #include using namespace std; void func () { float a,b; cout << "a="; cin >> a; cout << "b="; cin >> b; cout << a*b << endl; } int main () { func (); system ("PAUSE"); return 0; }

Answer 1

В сущности как-то так:

procedure func;

 var a,b: real;

begin

 write('a=');

 readln(a);

 write('b=');

 readln(b);

 writeln(a*b);

end;

begin

 func;

end.

Comments

Спасибо