Войти Регистрация Спроси ai-bota

Напишите программный код к следующей блок схеме

Нажмите на рекламу ниже и сразу увидите ответ

↓

Популярные вопросы:

daniilkornev05

14.10.2022 10:46

Const n=4; var a: array[1..10,1..10] of integer; j,i,s: integer; begin randomize; writeln( случайная матрица: ); for i: =1 to 3 do begin for j: =1 to 3 do begin a[i,j]:...

ОМЛА

14.10.2022 10:46

Проверить сколько байт содержится в 30 кбайт 125 кбайт 1024 кбайтах 71 кбайт 13 гбайт...

vladykasevera

14.10.2022 10:46

Определите основание системы счисления 18=30х...

eldardadashov

21.05.2020 18:25

Запросите у пользователя несколько символов и выведите на экран их коды...

малика230

10.08.2020 14:28

Упети есть 20 игрушечных солдатиков различного размера – от самых маленьких до достаточно больших . вот список их длин в см: 20, 9, 24, 12, 23, 24, 21, 17, 1, 15, 25,...

gruttt

07.11.2022 06:51

1. сколько байт информации составляет сообщение содержащие одну двенадцатою часть мегабайта? 2. перечистить устройства ввода информации в память компьютера? 3. сколько...

sasacot

27.08.2020 22:34

Чему равно значение выражения: : 1) 2 mod 2 2) 34 mod 23) 32 mod 164) 10 div 25) 10 div 2 mod 2...

danilpetuhuv03

07.02.2023 15:34

Надо код на языке Паскаль I. Имеется ряд цилиндрических резервуаров, высота которых одинакова и равна Н, а внутренние радиусы оснований образуют последовательность: R,R/21/2,R/31/2....

5polinka

23.10.2022 18:47

відмінні риси трьох типів діаграм: стовпчикової (або гістограма), секторної (або колова) та графіку ....

vvasilchenkosn

26.11.2022 14:21

Срешениеми условием по .два одинановых проводящих шарика с -5нкл и +15нкл соприкаснулись и разошлись на расстояние 60см.определите силу взаимодействия шариков считайте...

Ответ:

рябов2005

11.09.2020 20:48

Var

A,b,max:integer;

Begin

Read(a,b);

If a>b then max:=a

Else max:=b;

Write(max)

End.

0,0(0 оценок)

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку