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

Вопрос школьника по предмету Информатика

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

Ответ учителя по предмету Информатика

uses crt;

var

s,c:real;

begin

writeln(‘Введите стоимость завтрака’);

readln(c);

s:=0;

for var i:=1 to 7 do

s:=s+c;

writeln(‘Сумма, истраченная школьником на завтраки за неделю= ‘,s);

end.