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

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.

Поликша Эвелина 2019-01-11 21:40:35

А что за k+=1? Может k:=1?

Пашка 2019-01-11 21:46:23

За каждую интерацию к переменной k прибавляется 1

Полевин Максим 2019-01-11 21:50:37

k+=1 это сокращенная запись k=k+1

Тема Капылов 2019-01-11 21:54:30

k:=k+1*

Борис Юдапов 2019-01-11 22:01:27

Спасибо огромное, а можешь еще одно решить, если не трудно, буду очень признательна? Я в новеньком ответе написала.

Олег Безридный 2019-01-11 22:10:11

А почему мы объявили тут 3 переменные?

Rohlikov Vovka 2019-01-11 22:11:55

Вещественные переменные не могут использоваться как счетчик цикла

Диман Ловцевич 2019-01-11 22:20:33

s- цена, k- килограммы, а i что такое?

Зепсуй Шурик 2019-01-11 22:26:36

i счетчик цикла

Эвелина Пондопуло 2019-01-11 22:34:53

Можешь помочь пожалуйста?

О проекте

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

Добро пожаловать!