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.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
