1) 1214
разделяем на 2 числа 12 и 14, НОК чисел равен 2
получаем 12=6*2
14=7*2, значит трёхзначное число может быть 627 или 726
Вот ответ:
99300147.2 байта
Var
p:real;
k:integer;
begin
Write('Грузоподъемность судна: '); Read(p);
Write('Количество судов: '); Read(k);
Writeln('Грузоподъемность флотилии составит ',p*k)
end.
<u>Пример</u>
Грузоподъемность судна: 12000
Количество судов: 7
Грузоподъемность флотилии составит 84000
var x: integer; y: real;
begin
readln(x);
If x<=-10 then
y:=x*x+25-x
else If (-10<x) and (x<=10) then
y:=3+x
else y:=1/x;
writeln(y);
end.
Смотри вложение
................................