Написать блок (структурную) схему для a*x+b*y=c, удовлетворяющую условиям ixi< =10, iyi< =20. здесь a, b, c - заданные числа.
программа на языке паскаль

var
a,b,c,x,y: integer;
begin
write('a=');
readln(a);
write('b=');
readln(b);
write('c=');
readln(c);
for x: =0 to 10 do
for y: =0 to 20 do
if a*x+b*y=c then
begin
writeln('x=',x);
writeln('y=',y);
writeln
end;
end.

89681355832    3   15.12.2019 18:58    0