Предмет: Информатика,
автор: 2000nikita2000
Написать программу в паскале: Имеется кусок ткани длинной M метров. От него последовательно отрезаются куски равной длины. Все данные по использованию ткани заносятся в компьютер. Компьютер должен выдать сообщение о том, что материала не хватает, если будет затребован кусок ткани больше длины, чем имеется.
Ответы
Автор ответа:
0
PROGRAM LGJ;
var
m,n:real;
begin
writeln('введите длинну ткани');
readln(m);
writeln('введите отрезаюмую длинну');
readln(n);
if m<n then
writeln('материала не хватает!');
end.
var
m,n:real;
begin
writeln('введите длинну ткани');
readln(m);
writeln('введите отрезаюмую длинну');
readln(n);
if m<n then
writeln('материала не хватает!');
end.
Интересные вопросы
Предмет: Математика,
автор: muratbekovaasema
Предмет: История,
автор: parpievasevinch07
Предмет: История,
автор: nkastyi27
Предмет: География,
автор: nikacristal
Предмет: Алгебра,
автор: nucha2010