Obsah obdélníku vypočítáme ze vzorce: S = a*b.
|
1 2 3 4 5 6 7 8 9 10 11 12 13 |
program obsah_01; var a, b, s : word; begin writeln('napiste a:'); readln(a); writeln('napiste b:'); readln(b); s := a*b; writeln('Obsah obdelniku je ', s); readln; end. |
Pingback: BBC Post