Ask Question

Name:
Title:
Your Question:

Answer Question

Name:
Your Answer:
User Submitted Source Code!


Description:
  Pascál
Language: PASCAL
Code:
Program utido;
VAR s,t:real;
BEGIN
Write('Add meg az utat (m) és az időt (s): ');
Readln(s,t);
If (s<0) or (t<=0) then writeln('Értelmetlen adatok!’)
else writeln('Az átlagsebesség: ',s/t:0:2,' m/s');
Writeln('Nyomj ENTER-t!');
Readln;
END.          
          
          
          
          
Comments: