1. вывести на экран квадраты чисел от 11 до 27 . 2. найти произведение четных чисел в промежутке от 23 до 5. 3. найти сумму двухзначных чисел кратных 7.
1) Var i:integer; Begin For i:=11 to 23 do Write(i*i,' '); End. 2) Var i,K:integer; Begin K:=1; For i:=5 to 23 do Begin if i mod 2 = 0 then K:=K*i; End; Write(K); End. 3) Var i,K:integer; Begin K:=0; For i:=10 to 99 do Begin If i mod 7 = 0 then K:=K+i; End; Write(K); End.
Наливаем в 5-литровую ёмкость 5 литров. Выливаем эти 5 литров в трехлировую емкость, тогда в пятилитровой емкости остнется 2 литра. Выливаем воду из трехлитровой ёмкости. Переливаем в неё 2 литра из пятилитровой ёмкости и наливаем воду в пятилитровую воду. Всего 7 литров: 2 литра в трехлитровой и 5 литров в пятилитровой
5 - литровая 3-литровая 5 0 1 шаг: наливаем в пятилитровую, трехлитровая пустая 2 3 2 шаг: вылили три литра в трехлитровую, 2 литра осталось в пятилитр. 2 0 3 шаг вылили воду из трехлитровой, в пятилитровой остаток 2 литра 0 2 4 шаг вылили 2 литра из пятилитровой в трехлитровую 5 2 5 шаг наливаем 5 литров в пятилитровую и 2 литра имеет в трехлитровой всего 7
Мой любимый предмет это - информатика! На уроках информатики мы познаём компьтерный мир. Сотни программ созданны для нашего поколения чтобы создавать различные презентации, мультфильмы, анимации, рисунки и много всего другого, что так-же нам интересно! Если почитать в интернете о данной науке, то мы можем сразу сделать вывод, что на самом деле придуманно очень большое кол-во программ и приложений. Мы можем узнать погоду, написать сочинение или реферат, подготовить презентацию, отправить любой файл через доступные приложения и программы, как на компьтере так и на телефоне, а самое главное всё отправляется в один миг - и получатель сообщения может сразу воспользоваться файлом. Существую так-же различные форматы файлов, для удобствия получать на любом устройстве. Насчёт данной науки я могу сказать так: наша цивилизация развивается очень быстро и в этом ей информатика!