ДАЮ 30 БАЛЛОВ! СРОЧНО!

В программе Паскаль

var x:real;

begin

x:=0;

writeln ('x y');
repeat

writeln (x,' ', xxx+1);

x:=x+0.2;

until x>1

end.

Чтобы вместо точек у не целых чисел выводились запятые

Например:
Строка вывода
Было

x y

0 1

0.2 1.008

0.4 1.064

0.6 1.216

0.8 1.512

1 2

Стало

x y

0 1

0,2 1,008

0,4 1,064

0,6 1,216

0,8 1,512

1 2

Ответ

Автор - BobbyFresnel

===== PascalABC.NET =====

uses System.Globalization;

begin

CultureInfo.CurrentCulture.NumberFormat.NumberDecimalSeparator := ',';

var x := 0.0;

writeln(' x y');

repeat

System.Console.WriteLine($'{x,3:f1} {x ** 3 + 1,5:f3}');

x += 0.2;

until x > 1

end.

Предыдущий вопрос Следующий вопрос

Сервис носит ознакомительный характер, вся информация, а в частности вопросы и ответы, которые задают и отвечают пользователи.