Помогите пожалуйста с 9 заданием, находил тут ответ но он не правильный.Если что то PascalABC
Приложения:
Ответы
Ответ дал:
0
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.
Ответ дал:
0
Уверен(на)что правильно?
Ответ дал:
0
да
Ответ дал:
0
1кг=10р. 0.1кг=1р. 0.2кг=2р
Похожие вопросы
2 года назад
2 года назад
2 года назад
8 лет назад