Предмет: Информатика,
автор: prostodi27
Информатика! Регить с циклом "For". Срочно! Умоляю! Даю 55 баллов. Плиз
Приложения:

Ответы
Автор ответа:
1
var s,k: real;
i:integer;
Begin
Write('Введите стоимость 1 кг конфет: ');
Readln(s);
for i:=1 to 10 do begin
k+=1;
Writeln('Стоимость ', k*0.1, ' кг конфет = ', k*0.1*s);
end;
end.
i:integer;
Begin
Write('Введите стоимость 1 кг конфет: ');
Readln(s);
for i:=1 to 10 do begin
k+=1;
Writeln('Стоимость ', k*0.1, ' кг конфет = ', k*0.1*s);
end;
end.
prostodi27:
А что за k+=1? Может k:=1?
Похожие вопросы
Предмет: Математика,
автор: elerbekgajbullaev
Предмет: Математика,
автор: Kikioriki0011
Предмет: Музыка,
автор: karinka121812
Предмет: Математика,
автор: привет491