Войти
Регистрация
Спроси ai-bota
igfubvl367
06.04.2023 11:10
Запишите код программы с операторов интегрированной среды программирования для заданного алгоритма.
Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
Nope2281
08.09.2020 21:10
Что делать если удалилась папка storage на телефону...
baus100
08.09.2020 21:10
Написать программу на языке с++, которая выводила бы на экран фигуру в форме сердца...
alexc123
08.09.2020 21:10
Укажите в каком ряду находятся только алгориметрические числа десятичной системы счисления? а)11,20,25,100,125 b)5,10,15,20,25,30 c)0,1,2,3,4,5 d)0,1,10,100,1000...
RHW1
02.03.2022 01:23
Ввести одномерный массив из n вещественных чисел в диапазоне от -10 до + 10. вывести массив на экран. вычислить среднее арифметическое квадратов отрицательных чисел, положительные...
PSerega11111111
06.05.2022 11:40
Графическая разновидность шрифта в пределах одной гарнитуры, различаемая по плотности (ширине) (нормальное, узкое, широкое), по постановке (наклону) (прямое, курсивное, наклонное),...
6ytq3j5uhGBQ
07.02.2023 10:14
Составить программу для решения задачи: Абонент пользуется следующим тарифом мобильной связи: ежемесячный платеж составляет 250 рублей пакет оплачиваемых этой суммой услуг составляет:...
yulia14683
08.12.2020 07:35
Статья, набранная на компьютере, содержит 36 страницы, на каждой странице 48 строк, в каждой строке 56 символов. Определите размер статьи в кодировке КОИ-8, в которой каждый символ...
StradasfeR
22.02.2021 13:18
Первая бригада может выполнить задание за 15 часов а вторая за 60 часов за сколько часов выполнят задание обе бригады при совместной работе...
FOMALEKSANDRA99
16.05.2021 10:10
НА ПАСКАЛЕ ИНФОРМАТИКА Напишите процедуру, которая по входному параметру n –– нечетному числу, не превосходящему 21, будет печатать с символов «∗» равнобедренный треугольник. Входные...
Mizukage
26.12.2022 23:40
Ниже на языке программирования Pascal записан алгоритм. var x, L, M: integer; begin readln(x); L := 1; M := 0; while x 0 do begin M := M + 1; if x mod 2 0 then L := L * (x mod 8);...
Ответ:
yarovikova1981
12.10.2020 02:43
PascalABC.Net
Variant 1
var x, y, z: integer; begin Read(x, y); if x > y then z := x - y else z := y - x; Writeln('Z:= ', z); end.
Variant 2
begin var (x, y) := ReadInteger2; Println(if x > y then x - y else y - x); end.
0,0
(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота