Shift+Alt как современные дети не могут это знать
Var a: array [1..5] of integer;
begin
readln(a[1],a[2],a[3],a[4],a[5]);
write(a[1],',',a[2],',',a[3],',',a[4],',',a[5])
end.
Значение компьютера в современной жизни
<span> Компьютер, или электронно-вычислительная машина, в нашей жизни занимает все большее место. С его помощью можно напечатать текст или произвести математические вычисления, составить расписание движения поездов и управлять технологическим процессом на заводе, изучать иностранные языки и руководить полетом космической станции, вести бухгалтерские расчеты и планировать бюджет страны, общаться с людьми, находящимися в любой точке земного шара, и вести тончайшие хирургические операции, послать письмо другу и сделать фотографию. </span>
<span> Я могла бы еще долго перечислять возможности современных компьютеров. Но и из этого перечня ясно, что развитие современных технологий, управление экономикой и производством, образование и медицина, наука и космос сегодня немыслимы без компьютера. </span>
//PascalABC.NET (версия 3.1, сборка 1196 от 09.03.2016)
begin
var k:real;
var b:real;
repeat
k := ReadReal('Введите k');
b := ReadReal('Введите b');
until k <> 0;
var x := -2;
while x <= 2 do
begin
print(k * x + b);
x := x + 2;
end;
end.