с помощью интернета люди могут общаться друг с другом
Пробовал, решить невозможно, или я такой дуболом.
Для определения числа в разряде десятков, нужно как минимум 9 вопросов.
Спрашивая "Больше ли оно K" - добиться этого невозможно.
Но могу подсказать начало :)
program dlya_Pro100LiNa;
var a,b,c,d:integer;
m:boolean;
begin
writeln ('Введите число от 1-го до 1000');
repeat read(a) until (a>=1)and(a<=1000);
...
end.
Var
n:integer;
begin
n:=20;
while n<=320 do begin
Write(n,' ');
n:=2*n
end
end.
Результат работы
20 40 80 160 320
Program maxx;
var ocenka,sdal,nesdal,k,i:integer;
begin
writeln('введите кол-во оценок');
readln(k);
sdal:=0;
nesdal:=0;
for i:=1 to k do
begin
readln(ocenka);
if ocenka>2
then sdal:=sdal+1;
else nesdal:=nesdal+1;
end;
writeln(sdal);
writeln(nesdal);
<span>end.</span>
А) Последствия событий 13 века: события этого века положили начало отстаиванию русских земель от стран 'Западной Европы; Золотоордын-ское иго нанесло огромный ущерб экономическому. политическому и культурному развитию Руси
б) Океан - главный хранитель воды, давно поражающий исследователей необычностью своих свойств. Воды пронизывают всю географическую оболочку и производил в ней разнообразную работу
в) Симбиоз - это взаимовыгодное отношение двух организмов. Плоские черви - паразиты
г) Всякий равносторонний треугольник есть равноугольный треугольник. Прямоугольник с равными сторонами есть квадрат
д) Русский язык - один из славянских языков. Пунктуация изучат знаки препинания
е) Пушкин - великий русский поэт. Достоевский - один из популярных писателей
<span>ж) Информатика зиждется на математике. Компьютер облегчил жизнь человека
</span>