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

Напишите, , ипрограмму по этой блок-схеме

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

↓

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

ryckovan3

18.04.2020 16:55

с программой Элементы списка вводятся генератором случайных чисел В одномерном списке A=(a1, а2, ..., аn) все отрицательные элементы, имеющие нечетный порядковый номер, отправить...

kiscaki

01.11.2020 12:16

ПАСКАЛЬ Дана строка, содержащая пробелы. Найдите в ней самое длинное слово, выведите это слово и его длину. Если таких слов несколько, выведите первое из них. Входные данные Задана...

kavuzov01karamba73

16.11.2020 03:02

Материнская плата презентация...

никлася

19.12.2021 17:20

с клавиатуры введите два натуральных числа m и n. создайте однонаправленный список, который будет содержать числа, кратные числу m, равному числу n...

svetysa95

02.01.2023 06:15

Составить программу, которая находит наименьшее количество множителей ряда 1,5*1,8*2,1*2,4* … , произведение которых превышает число 10...

krikovaluba

02.01.2023 06:15

Чертёжнику был дан для исполнения следующий алгоритм: повтори 3 раз сместиться на (-2 , -1) команда 1 сместиться на (2 , 1)...

islamghj

02.11.2022 07:31

Help ! определите значение переменных s и i после выполнения фрагмента программы: s: =0; i: =5; while i =0 do begin s: =s+i; i: =i-1; end; выберите один ответ: s=5, i=0 s=15, i=0...

Dariasolne4naya

12.12.2021 16:51

Информатику нужно. Если у вас есть компьютер, то попробуйте выполнить данные задания накомпьютее по шагам, если нет, то внимательно изучите материал.Откройте учебник на стр. 36, выполните...

Snaga

16.06.2020 14:40

феномен соціальних мереж можна продемонструвати на теорії?а)4 рукостисканняб) 5..в)6..г)7...2)Який тип користувачів соціальних мереж постійно прагнуть ділитися своєю думкою щодо контенту...

AngelinaMon

25.02.2023 04:18

Где-то в поле Робота находится прямоугольник неизвестного размера, в верхней стенке которого имеется отверстие шириной в одну клетку. Робот из верхнего левого угла поля должен дойти...

Ответ:

Тучка12

11.06.2020 01:22

Пишу в Pascal

Объяснение:

var

x,f:real;

begin

read(s);

if x>0 then

f:=x

else

f:=-x;

write(f);

end.

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

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

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