Регистрация
simpolita
12.10.2022 14:42
Информатика
Есть ответ 👍

Об этом ученом известно следующее (впишите в ячейки конкретные данные из биографии этого ученого, назовите его ф.и.о.): 1. родился в городе, знаменитом «разделяющим пополам» водоемом (назовите город и водоем) 2. в этот год авраам линкольн стал президентом сша. (напишите год) 3. в семье было
семеро детей (укажите, каким по счету ребенком был ученый) 4. по словам родителей, он был болен …., выражающейся в нарушении письменной речи (напишите заболевание) 5. в 14 лет он был исключен из школы. (назовите причину). 6. в 16 лет поступил в колледж на инженерную специальность (укажите
специальность) 7. его устройство государству около 600 тыс. долларов. (назовите для чего использовалось это устройство) 8. на выставке в париже он был награждён золотой медалью (назовите год). 9. основал свою фирму по реализации и обслуживанию этих машин. (назовите год основания, первоначальное
название фирмы и последующее название) 10. ф.и.о ученого.

122
218
Посмотреть ответы 1

Ответы на вопрос:

yanemykina2014
yanemykina2014
4,5(94 оценок)
1) var a,i,i1: integer; begin writeln('введите число'); read(a); for i: =1 to a do begin i1: =i1+1; write(i1,' '); end; end.2)var i: integer; var a: string; begina: ='*'; for i: =1 to 10 do beginwriteln(a); a: =a+'*'; end; end.3)var a: array [1..10] of integer; var i,j,k: integer; beginfor i: = 1 to 10 do begina[i]: =random(1,100); write(a[i],' '); end; writeln; for i : = 1 to 9 dofor j: = 1 to 10-i doif a[j] > a[j+1] then begink : = a[j]; a[j]: = a[j+1]; a[j+1]: = kend; for i : = 1 to 10 dowrite (a[i],' '); writeln; end.

Популярно: Информатика