Определить сумму, истраченную школьником, на завтраки в течение недели
Паскаль циклом сос

uses crt;vars,c:real;beginwriteln('Введите стоимость завтрака');readln(c);s:=0;for var i:=1 to 7 dos:=s+c;writeln('Сумма, истраченная школьником на завтраки за неделю= ',s);end.