главная     электронная почта

Решение задачи

{ Найти сумму. }

uses crt;
var a,b,s : integer;
begin
  clrscr;
  write('a=');readln(a);
  write('b=');readln(b);
  s:=a+b;
  write('сумма s=',s);
  readln;
end.
Hosted by uCoz