pascalabcnet/InstallerSamples/!Tutorial/01_First/Calculations3.pas

11 lines
333 B
ObjectPascal
Raw Permalink Normal View History

2018-10-26 20:12:42 +03:00
// Вывод результатов вычислений. Используются переменные и процедура ввода
2015-05-14 22:35:07 +03:00
begin
2018-10-26 20:12:42 +03:00
var (a,b) := ReadlnInteger2('Введите a и b:');
Println;
Println(a,'+',b,'=',a+b);
Println(a,'-',b,'=',a-b);
Println(a,'*',b,'=',a*b);
Println(a,'/',b,'=',a/b);
end.