Помогите пожалуйста с 9 заданием, обретал здесь ответ но он не

Помогите пожалуйста с 9 заданием, выискал здесь ответ но он не правильный.Если что то PascalABC

Задать свой вопрос
2 ответа

1кг=10р. 0.1кг=1р. 0.2кг=2р

var x: real;

i: integer;

begin

write ('x = ');

readln(x);

for i:=1 to 10 do writeln (0.1*i:2,' кг конфет стоит ',x/10*i:0:2, ' рубл.' );

end.

Inna Barbjelatje
Уверен(на)что верно?
Alla Tekmaeva
да
, оставишь ответ?
Имя:*
E-Mail:


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

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт