Предмет: Информатика, автор: prostodi27

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

Приложения:

Ответы

Автор ответа: zmayz
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.

prostodi27: А что за k+=1? Может k:=1?
zmayz: За каждую интерацию к переменной k прибавляется 1
zmayz: k+=1 это сокращенная запись k=k+1
zmayz: k:=k+1*
prostodi27: Спасибо большое, а можешь еще одно решить, если не сложно, буду очень признательна? Я в новом ответе написала.
prostodi27: А почему мы объявили здесь 3 переменные?
zmayz: Вещественные переменные не могут использоваться как счетчик цикла
prostodi27: s- стоимость, k- килограммы, а i что такое?
zmayz: i счетчик цикла
prostodi27: Можешь помочь пожалуйста?
Похожие вопросы
Предмет: Математика, автор: Kikioriki0011
Предмет: Математика, автор: привет491