Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
Dianissimolps
12.06.2020 08:40 •
Информатика
Запишите алгоритм на языке тр алг.вычислите площпди и объема вещ х,s,v нач вывести "введите длину ребра куба" ввести х s: =6х(в квадрате) v: =х(в кубе) кон
👇
Увидеть ответ
Ответ:
ImmortalSpirit
12.06.2020
var s,x,v:integer;
begin
s:=0; v:=0;
readln(x);
s:=6*sqr(x);
v:=x*x*x;
writeln(sqrt(s/6));
end.
4,5
(22 оценок)
Открыть все ответы
Ответ:
KavaiiGot
12.06.2020
{ ответ дан на языке Pascal }
{ Вариант a }
PROGRAM Solution(INPUT, OUTPUT);
VAR
Str: STRING;
Str1: STRING;
Str2: STRING;
Str3: STRING;
TempStr: STRING;
BEGIN
WRITE('Введите строку: ');
READLN(Str);
Str1 := COPY(Str, 1, LENGTH(STR) DIV 3);
Str2 := COPY(Str, LENGTH(STR) DIV 3 + 1, (LENGTH(STR) DIV 3));
Str3 := COPY(Str, (LENGTH(STR) DIV 3) * 2 + 1, LENGTH(STR));
WRITELN(Str2 + Str3 + Str1);
END.
{ Вариант b }
PROGRAM Solution(INPUT, OUTPUT);
VAR
Str: STRING;
Str1: STRING;
Str2: STRING;
Str3: STRING;
TempStr: STRING;
BEGIN
WRITE('Введите строку: ');
READLN(Str);
Str1 := COPY(Str, 1, LENGTH(STR) DIV 3);
Str2 := COPY(Str, LENGTH(STR) DIV 3 + 1, (LENGTH(STR) DIV 3));
Str3 := COPY(Str, (LENGTH(STR) DIV 3) * 2 + 1, LENGTH(STR));
WRITELN(Str3 + Str1 + Str2);
END.
4,6
(32 оценок)
Ответ:
pogasii
12.06.2020
{ ответ дан на языке Pascal }
{ Вариант a }
PROGRAM Solution(INPUT, OUTPUT);
VAR
Str: STRING;
Str1: STRING;
Str2: STRING;
Str3: STRING;
TempStr: STRING;
BEGIN
WRITE('Введите строку: ');
READLN(Str);
Str1 := COPY(Str, 1, LENGTH(STR) DIV 3);
Str2 := COPY(Str, LENGTH(STR) DIV 3 + 1, (LENGTH(STR) DIV 3));
Str3 := COPY(Str, (LENGTH(STR) DIV 3) * 2 + 1, LENGTH(STR));
WRITELN(Str2 + Str3 + Str1);
END.
{ Вариант b }
PROGRAM Solution(INPUT, OUTPUT);
VAR
Str: STRING;
Str1: STRING;
Str2: STRING;
Str3: STRING;
TempStr: STRING;
BEGIN
WRITE('Введите строку: ');
READLN(Str);
Str1 := COPY(Str, 1, LENGTH(STR) DIV 3);
Str2 := COPY(Str, LENGTH(STR) DIV 3 + 1, (LENGTH(STR) DIV 3));
Str3 := COPY(Str, (LENGTH(STR) DIV 3) * 2 + 1, LENGTH(STR));
WRITELN(Str3 + Str1 + Str2);
END.
4,6
(85 оценок)
Это интересно:
К
Компьютеры-и-электроника
10.04.2020
Как победить Элитную Четверку в Pokemon FireRed...
22.05.2023
Как убедить родителей не пустить вас в школу: советы для тех, кто хочет изменить свою жизнь...
Х
Хобби-и-рукоделие
04.09.2020
Как сделать фетровую шляпу: пошаговая инструкция с фото...
Х
Хобби-и-рукоделие
01.08.2021
Как найти изображения на компьютере: советы и рекомендации...
К
Кулинария-и-гостеприимство
23.07.2022
Как приготовить бисквитный торт: простое рецепт и советы на все случаи жизни...
К
Компьютеры-и-электроника
31.05.2022
Как сделать полный сброс на телефоне Nokia N73...
Д
Дом-и-сад
18.12.2021
Как сделать полироль для мебели из оливкового масла...
И
Искусство-и-развлечения
02.01.2020
Мастерим свою технику: как играть барабанные рудименты...
О
Образование-и-коммуникации
02.11.2020
Как написать благодарственное письмо клиенту: примеры и советы...
К
Кулинария-и-гостеприимство
23.10.2020
Как разогреть молоко, не перегревая его...
Новые ответы от MOGZ: Информатика
lerapro123
12.07.2020
Даны пиктограммы опции «Конструктор диаграмм». Сопоставь данные. выполняет взаимную замену данных на осях дает возможность изменить диапазон данных дает возможность смены типа диаграммы...
персик08
11.11.2021
Напиши программу, которая определяет длину строки s=Hello и подсчитывает количество букв 0...
Divas888
11.05.2022
с информатикой. тут всего лишь кроссворд...
msSisi1
08.04.2022
Дополните предложения. a) в приложении Excel-очень удобная функция, дающая возможность автоматического заполнения таблицы данными и выполнения автоматического вычисления с формул....
Viktoria200430
14.03.2020
ЭТО КАНТРОЛЬНАЯ Перечислить основные виды информации по ее восприятия человеком зрительная текстовая графическая звуковая числовая обанятельная видео осязательная и вксувая...
12355567908753
05.02.2022
НА УРОКЕ СИЖКУ КОНТРОЛЬНАЯ. 1. Назначение и виды ЗУ. 2. Какое ЗУ наиболее быстродействующее? Как работает контроллер этого ЗУ? 3. Назвать виды энергозависимых ЗУ. Для каждого из этих...
kurotetsu666
25.12.2021
Нужно Что такое график функции? 2) Какой тип графика лучше всего подходит для отображения данных математических функций?...
OMGKristallikOMG
18.10.2020
Можно ли форматировать текст если он уже стал частью рисунка...
annmalik98
10.04.2021
Сопоставить элементы диаграммы ...
KellenPack
26.07.2022
Посчитайте информационный обьем сообщений которое содержит 7 страниц 50 строк , 32 синвода юникод?...
MOGZ ответил
Верны ли определения? А) Механизм развития – это совокупность процедур, методов,...
получения знаний о причинах той или иной результативности совместной деятельности...
Верны ли определения? А) Государственное образовательное учреждение – это образовательное...
Управленческий процесс создания и поддержания соответствия между целями фирмы, ее...
Верны ли определения? А) Процессный подход рассматривает управление как непрерывную...
Верны ли утверждения? А) Основными педагогическими функциями прогнозирования в области...
Одним из основных условий модернизации образования является _ отношения государства...
Категория, выражающая вещь или систему взаимосвязанных вещей в совокупности всех...
Взаимосвязанные цели и задачи, содержание, критерии и показатели оценки, динамика...
Самый низший (первый) показатель степени обученности учащегося, характеризующийся...
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ
Оформи подписку
О НАС
О нас
Блог
Условия пользования
Авторское право
Политика конфиденциальности
Предпочтения cookie-файлов
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
App
Вход
Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ
var s,x,v:integer;
begin
s:=0; v:=0;
readln(x);
s:=6*sqr(x);
v:=x*x*x;
writeln(sqrt(s/6));
end.