search points attachment profile arrow left arrow right star heart verified symbols equation arrow-down question mark check menu accountancyadministrationagriculturalalgebraallarabicartart_musicbelarusbelarus_altbiologybusinesscatalachemistrychineseeconomicsegzamenglishentrepreneurshipenvironmentethicseuskarafirst_aidfrenchgalegogeographygeologygeometrygermangrammarhealthhistoryindia_langindonesian_langinformaticsitalianjapanesekazachkazach_altkoreanlanguagelatinlawlife_scienceliteraturelogicmathematicsmusicnigerian_langother_languagesotherspedagogicsphilosophyphysical_educationphysicspoliticspsychologyreligionrpa_langrussianrussian_altsciencesecurityskillssocial_sciencesociologyspanishstatisticstechnologytourismtrafficukrainianukrainian_altukrainian_literaturewos_civilisation accountancyadministrationagriculturalalgebraall_1arabicartart_music_2belarusbelarus_altbiologybusiness_2catalachemistry_1chineseeconomicsexam_3englishentrepreneurshipenvironment_2ethicseuskarasecurity_1frenchgalegogeography_4geology_4geometrygermangrammarhealthhistoryindia-langindonesian-langinformaticsitalianjapanesekazachAsset 230koreanlanguagelatinlawlife-scienceliteraturelogic_2mathematicsmusicnigerian-langotherlanguagesother_1pedagogicsphilosophyphysical_educationphysicspoliticspsychologyreligion_1rpa-langrussianrussian_altsciencesecurity_3_mskills_1allsocial_science_5_msociologyspanishstatisticstechnologytourismtrafficukrainianukrainian_altukrainian_literaturewos_civilisation
Автор - newgreen

Через программу Кумир
1) ввести два числа и вывести их в порядке возрастания.
Введите два числа:
15 9
Ответ: 9 15
2) Ввести пять чисел и найти наибольшее из них.
Введите пять чисел:
4 15 9 56 4
Наибольшее число 56

Ответ

Автор - nahukep18

var a,b,c,y,x,min,max:integer;

begin

writeln('Введите первое число');

readln(a);

writeln('Введите второе число');

readln(b);

writeln('Введите третье число');

readln(c);

writeln('Введите четвертое число');

readln(x);

writeln('Введите пятое число');

readln(y);


if a > b then max :=a else max :=b;

if max < c then max:=c;

if max < y then max:=y;

if max < x then max:=x;

writeln('Максимальное число = ',max);

end.

Ответы и объяснения

По всем вопросам пишите на - [email protected]
Сайт znanija.net не имеет отношения к другим сайтам и не является официальным сайтом компании.