Pascal — различия между версиями
Den (обсуждение | вклад) |
Den (обсуждение | вклад) |
||
| Строка 2: | Строка 2: | ||
| + | <source lang="cpp"> | ||
var | var | ||
f1,f2:text; | f1,f2:text; | ||
| Строка 17: | Строка 18: | ||
close(f2); | close(f2); | ||
end. | end. | ||
| + | </source> | ||
Версия 12:22, 14 февраля 2010
Pascal
<source lang="cpp">
var f1,f2:text; sum,a,b:integer; begin Assign(f1,'input.dat'); Assign(f2,'output.sol'); Rewrite(f2); Reset(f1); Read(f1, a); Read(f1, b); close(f1); sum:=a+b; Write(f2, sum); close(f2); end.
</source>
