fork download
copy 
  1. program ideone;
  2. var
  3.   P,a: Real;
  4. begin
  5.   Write('Введите значение стороны квадрата: ');
  6.   Readln(a);
  7.   P:=4*a;
  8.   Writeln('Периметр квадрата равен: ', P);
  9. end.
Runtime error #stdin #stdout #stderr 0s 336KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
Введите значение стороны квадрата:
stderr
copy 
Runtime error 106 at $000000000040021E
  $000000000040021E
https://ideone.com/G7CCii
language:
Pascal (fpc 3.0.4)
created:
4 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!