Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
tgdnm
08.10.2022 13:28 •
Информатика
Програма коды берілген n=789 a=n/100 b=(n//100)%10 c=n%10 кім жазды
инфо
👇
Увидеть ответ
Открыть все ответы
Ответ:
лщутлзутсзо
08.10.2022
Pascal
1. var a, b: real;
begin
write('Введите стороны прямоугольника: ');
read(a, b);
writeln('Периметр = ', 2 * a + 2 * b);
end.
2. var p, b: real;
begin
write('Введите два числа: ');
read(p, b);
writeln('Произведение = ', p * b);
writeln('Разность = ', p - b);
end.
3. var b: real;
begin
write('Введите длину ребра: ');
read(b);
writeln('Объем = ', b * b * b);
end.
4. var r: real;
begin
write('Введите радиус: ');
read(r);
writeln('Площадь = ', 3.14 * r * r);
end.
5. var a, b, c: real;
begin
write('Введите три стороны: ');
read(a, b, c);
writeln('Периметр = ', a + b + c);
end.
4,5
(9 оценок)
Ответ:
Ivan1955
08.10.2022
Pascal
1. var a, b: real;
begin
write('Введите стороны прямоугольника: ');
read(a, b);
writeln('Периметр = ', 2 * a + 2 * b);
end.
2. var p, b: real;
begin
write('Введите два числа: ');
read(p, b);
writeln('Произведение = ', p * b);
writeln('Разность = ', p - b);
end.
3. var b: real;
begin
write('Введите длину ребра: ');
read(b);
writeln('Объем = ', b * b * b);
end.
4. var r: real;
begin
write('Введите радиус: ');
read(r);
writeln('Площадь = ', 3.14 * r * r);
end.
5. var a, b, c: real;
begin
write('Введите три стороны: ');
read(a, b, c);
writeln('Периметр = ', a + b + c);
end.
4,5
(89 оценок)
Это интересно:
С
Стиль-и-уход-за-собой
26.01.2020
Как купаться при нехватке воды: простые советы...
К
Компьютеры-и-электроника
05.02.2021
5 простых шагов, как добавить проигрыватель к стереосистеме...
З
Здоровье
26.08.2020
Как начать заниматься бикрам йогой...
С
Семейная-жизнь
03.08.2021
Как избежать внематочной беременности...
К
Компьютеры-и-электроника
02.01.2020
Использование Wi-Fi Direct на Android: инструкция для начинающих...
С
Стиль-и-уход-за-собой
11.03.2022
5 простых шагов, как сделать маску для лица из алоэ вера...
П
Питомцы-и-животные
10.09.2021
Как разводить лягушек: советы для начинающих...
О
Образование-и-коммуникации
21.01.2020
10 способов усовершенствовать свой этикет в электронной почте...
П
Путешествия
23.02.2023
Как развить туристический бизнес: советы от экспертов...
Д
Дом-и-сад
17.04.2023
Как правильно покрасить древесину: советы от профессионалов...
Новые ответы от MOGZ: Информатика
LlesyaLis
25.02.2021
Определите значение переменной c после выполнения следующего фрагмента программы, в котором a, b и c – переменные вещественного (действительного) типа. бейсик паскаль a =...
Кристина15551
03.10.2020
Для какого из указанных значений x истинно высказывание ¬ ((x 2) → (x 1) 1 2) 2 3) 3...
Аньсминожек
03.10.2020
Для какого из указанных значений x истинно высказывание ¬ ((x 2) → (x 1) 1 2) 2 3) 3...
12Познователь12
04.10.2021
Өтініш көмектесіңіздерші ...
123настюша321
04.10.2021
Что в нутри какашек ??? расскажите плз...
twinnyXD
03.06.2022
Нұсқамаға байланысты айтылған дұрыс екі тұжырымды анықтаңыз, жалауша белгісін қойыңыз...
Пони0с0радушкой
20.03.2021
Написать программу для 6 класса с Паскаля с фигурами...
Svetic1985
06.12.2021
Программа на с++ нада десятичный перевести в двоичный код при рекурсии тоисть если вписал в програму 6 нада что б вывело 110 (при рекурсии)...
victory66
26.08.2022
Власть, краска, склон, полк, тепло, беда, экран. уберите в каждом слове одну согласную букву так, чтобы получилось новое слово....
dashasamoylova2
26.08.2022
Воробей унес в гнездо зерна весом 1, 2, 3 и 5 граммов, но он не смог унести зерна весом 6, 8, 9 и 12 граммов. зерна какого веса воробей может унести? 1)2 грамма 2)4 грамма...
MOGZ ответил
Найти четвертую степень выражения, если его квадрат равен 15a...
8 минут × 15 + 2 часа ÷6 - 54 секунды...
Определите стоимость (тариф) за воду на полив 1м2 земли в месяц, если:...
Які народні традиції та звичаї змальовані в творі «Тополя» Т.Г.Шевченко...
Найти массу и количество вещества оксида фосфора (V), образующегося при...
Мартин Боруля з його бажанням бути дворянином - це виклик життю чи заперечення...
В чому полягає небезпека Цахесів для суспільства?...
Сходства 3 сказок пушкин перро Жуковский о царицах...
Проєкції вектора АВ на осі хі у дорівнюють відповідно aib, а проєкція...
Тестові завдання №2 1. Визначте, у якому випадку скоєно злочин А школяр...
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ
Оформи подписку
О НАС
О нас
Блог
Условия пользования
Авторское право
Политика конфиденциальности
Предпочтения cookie-файлов
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
App
Вход
Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ
1. var a, b: real;
begin
write('Введите стороны прямоугольника: ');
read(a, b);
writeln('Периметр = ', 2 * a + 2 * b);
end.
2. var p, b: real;
begin
write('Введите два числа: ');
read(p, b);
writeln('Произведение = ', p * b);
writeln('Разность = ', p - b);
end.
3. var b: real;
begin
write('Введите длину ребра: ');
read(b);
writeln('Объем = ', b * b * b);
end.
4. var r: real;
begin
write('Введите радиус: ');
read(r);
writeln('Площадь = ', 3.14 * r * r);
end.
5. var a, b, c: real;
begin
write('Введите три стороны: ');
read(a, b, c);
writeln('Периметр = ', a + b + c);
end.