andreyduborezz2913
?>

Заполни пропуски в программе на языке Паскаль. Определить, принадлежит ли точка g отрезку [h;m]. var h, m, g:real; begin write(' ='); readln( ); write('m='); readln(m); write('g='); readln( ); if (g>=h) and (g<= ) then writeln ('yes') else writeln('no'); readln; end.

Информатика

Ответы

Константиновна

Интернет стал предметом первой необходимости. В немможно совершать покупки, общаться с друзьями, получатьобразование, работать. Возможности Интернета стали практически безграничными.

Говорят, без еды человек может прожить примерно 2 месяца (если будет пить), без воды человек погибает через 5-7 дней, а можно ли прожить без интернета??? Вы представляли когда-нибудь мир без Интернета?

Недавно, люди жили без великого творения - Интернет. Остается только удивляться: как? В последние годы, из информационного ресурса, Интернет превратился в незаменимую и очень важную часть нашей жизни. Работа, учёба, общение — всё связано с Всемирной Паутиной. Сеть перестала быть источником информации — теперь это поставщик услуг: увеселительных, образовательных.… Да любых. Чтобы скрасить одинокий вечер люди не идут в парк или кафе, они заходят в Интернет. Они ищут развлечений в электронной системе, а не среди живых людей.

beaevgen711
Var x,y,z:longint;
begin
writeln(' TEST');
writeln(' выберите верный вариант ответа 1,2 или 3');
writeln(' сюда вбиваешь вопрос ');
writeln('1.сюда варианты ответов);
writeln('2.сюда варианты ответов);
writeln('3.сюда варианты ответов);
read(x);
if (x=номер верного варианта) then y:=y+1;
writeln(' сюда вбиваешь вопрос ');
writeln('1.сюда варианты ответов);
writeln('2.сюда варианты ответов);
writeln('3.сюда варианты ответов);
read(x);
if (x=номер верного варианта) then y:=y+1;
writeln(' сюда вбиваешь вопрос ');
writeln('1.сюда варианты ответов);
writeln('2.сюда варианты ответов);
writeln('3.сюда варианты ответов);
read(x);
if (x=номер верного варианта) then y:=y+1;
if (y=3)then write('ваша оценка 5');
if (y=2)then write('ваша оценка 3');
if (y=1)then write('ваша оценка 2');
end.
проверить на ошибки а тест думаю вы и сами составите надеюсь всё правильно т.к. давно не работал на паскале

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Заполни пропуски в программе на языке Паскаль. Определить, принадлежит ли точка g отрезку [h;m]. var h, m, g:real; begin write(' ='); readln( ); write('m='); readln(m); write('g='); readln( ); if (g>=h) and (g<= ) then writeln ('yes') else writeln('no'); readln; end.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

kep92
Терентьева
nestruev
Кононова-БЕСКРОВНАЯ
klodialeit36
AndrukhovichKonovalov
Dlyamila
IPMelnikovR146
andre6807
oksanakv1950
anton-www1
tatarinova-51
сергей1246
bhg50
Zebra198383