тное от деления, в противном случае вывести сообщение "m на n нацело не делится".
1 лист
. . . . . . . . . . . . . . . . . . . . . . . . . ;
var a, b, max: integer;
. . . . . . . . . . . . . . . . . . . . . . . . . .
writeln(Введите два целых числа);
. . . . . . . . . . . . . . . . . . . . . . . . . . .
if a b then begin
end
. . . . . . . . . . . . . . . . . . . . . . . . . .
end;
writeln (Наибольшее число , max);
. . . . . . . . . . . . . . . . . . . . . . . . . . .
2 лист
program z1;
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
begin
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
read ( a, b );
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
end
else begin
end;
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
end.
3 лист
program qq;
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . ;
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
writeln(Введите два целых числа);
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
if a b then begin
end
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
end;
writeln (Наибольшее число , max);
. . . . . . . . . . . . . . . . . . . . . . . . . . . .
Страницы: << < 1 | 2 | 3 | 4 > >>