Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
видеокамеры, магнитофоны, DVD-проигрыватели, потоковое вещание в сети, ТВ-тюнеры, ресиверы цифрового телевидения
Объяснение:
пусть введенный интервал будет
b и c,где b< c
var a,b,c,i: longint;
begin
read(b,c);
for i: =b to c do
if i mod a=0 then write(i);
end.
program mdd; uses crt; var a,b,c,d: longint; beginclrscr; readln(a,b,c,d); if (a> b) and (a> c) and (a> d) and (d< a) and (d< c) and (d< b) then writeln('правда')else writeln(''неправда); readkey; end.
Популярные вопросы