Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
failbulkhin2017
07.04.2021 05:59 •
Информатика
Создавайте файл lesson4.htnal. Отфарматируйте предложенный фрагмент текста в соответствие с образом (применяя нумерованный список)
👇
Увидеть ответ
Открыть все ответы
Ответ:
лщутлзутсзо
07.04.2021
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
07.04.2021
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 оценок)
Это интересно:
О
Образование-и-коммуникации
07.05.2020
Как научиться рисовать людей: советы и примеры...
09.07.2022
10 советов как убедить родителей позволить вам завести маленькую собаку...
Ф
Философия-и-религия
20.10.2020
Как облечься во Всеоружие Божие: наставление для верующих...
К
Кулинария-и-гостеприимство
13.05.2023
Как отчистить старые кастрюли быстро и безопасно...
П
Праздники-и-традиции
14.05.2020
Как наполнить рождественский чулок: идеи для украшения...
К
Кулинария-и-гостеприимство
16.04.2021
Как выбрать емкости для хранения пищевых продуктов: советы и рекомендации...
З
Здоровье
11.09.2020
Как узнать, есть ли у вашего ребенка аллергия на глютен...
О
Образование-и-коммуникации
17.04.2021
Не можете правильно произнести французские буквы? Вот как это сделать правильно!...
П
Питомцы-и-животные
01.01.2023
Как подготовиться к появлению котят в доме...
И
Искусство-и-развлечения
17.05.2022
Как снять документальный фильм: советы от профессионалов...
Новые ответы от MOGZ: Информатика
mtmrfz43
09.03.2022
Как записать x^3 в паскале? Мне нужно написать программу где есть формула с неизвестной х . Человек вводит ее значение а программа учитывая это выдает ответ. Я все...
оля1911
12.11.2020
Информатика 9 класса помагите с 1 2 3 заданиями...
fewralskajaribozers3
02.09.2021
Выведите на экран все цифры делящиеся на 5 без остатка в диапазоне от 1 до 35(включительно). (Используйте цикл while, continue)...
kristok2012
08.10.2022
Паскаль исправьте данный код под условие задачи, данные не записываются в файл. Также нужно через // после команд написать что они делают. -- var f:file of integer;...
Habibullo32
07.04.2022
1)укажите порядок действий и назовите их1.¬a^b2.avb^¬a3.ab^c4.avb^a ¬ c^b...
малинка188
10.01.2021
81. в сети и интернет найдите информацию о современных терах и заполните таблицу. свойства принтера-принтер. (струйный, лазерный, матричный и 3д) принцип печати достоинства...
natalie1m222
01.07.2022
Ввести с клавиатуры число. увеличивать переменную i до тех пор, пока она не станет равна введенному числу; c++...
Zggzsbsnnzh
16.10.2022
1. перед вами 16-ричная последовательность: a0fff08000.закодируйте её при алгоритма rle, для этого выполните следующие шаги: а) переведите последовательность в 2сс:...
gorodkatya
17.11.2020
Какие объекты могут располагаться на слайде презентации?...
snejanas1
24.03.2022
Как осуществить захват кадра?...
MOGZ ответил
Уровнения (c-130)*50=500: x : (240: 2)=15...
Толстой война и мир князь андрей в мирное время и военное время...
Когда газу сообщили количество теплоты, равное 6мдж, он расширился...
Смуглое лицо, румянец на щеках, большие карие глаза, чёрные густые...
№1 скажите,что не так,и исправьте. в отрицательной ! 1. i shall...
За 6 секунд жук прополз 24 см .с какой скоростью он передвигается...
Нитрат желез 3+гидроксид натрия=гидроксид желез + , даже не представлят,...
Решить примеры с остатком и потом проверку только проверку не...
Какую бы ты взял книгу на необитаемый остров?...
Вшкольной мастерской сделали 60 больших лопат,меленьких на 12...
Полный доступ к 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.