Цитата:
Сообщение от AmyFloop
Бред... нахуй было вводить переменные ?
uses crt;
var s: integer;
begin
s:=3+6+9+12+15+18+21;
writeln(s);
end.
|
Вот это самый простой и достаточно правильный способ.
Только оператор program не забудь добавить.
Чуваку просто нужно грамотность показать, что он хоть в глаза видел Pascal. А тут ему начинают циклы, прогресии и т.д. Зачем прогу то усложнять? Вы бы ему ещё из файла предложили эти переменные (для суммы) читать.