Составить алгоритм и программу: вывести на экран числа по формуле а:= 4а+1 (диапазон чисел от 1 до 50);
Program chisla; uses crt; var a,b : integer; begin for a:=1 to 50 do begin b:=4*a+1; writeln(b); end; end.