Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
kuzmina9999
11.06.2020 21:31 •
Информатика
разберите программу, которая позволяет ввести значение переменнойx с клавиатуры, вычисляет x² и выводит результат на экран
👇
Увидеть ответ
Открыть все ответы
Ответ:
Лейла0044
11.06.2020
Var A,B:real;
Begin
//1
Write('Длина = ');ReadLn(A);
Write('Ширина = ');ReadLn(B);
WriteLn('S = ',A*B);
WriteLn('P = ',2*(A+B));
//2
WriteLn;
Write('Кол-во денег: ');ReadLn(A);
Write('Стоимость покупки: ');ReadLn(B);
WriteLn('Сдача: ',A-B);
//3
WriteLn;
Write('Расстояние: ');ReadLn(A);
Write('Стоимость проезда 1 км: ');ReadLn(B);
WriteLn('Стоимость проезда ',A,' км: ',A*B);
//4
WriteLn;
Write('Цена товара: ');ReadLn(A);
Write('Вес покупки: ');ReadLn(B);
WriteLn('Цена покупки: ',A*B);
//5
WriteLn;
Write('Объём в баррелях: ');ReadLn(A);
WriteLn('Объём в литрах: ',A*159);
End.
4,6
(7 оценок)
Ответ:
20071218hi
11.06.2020
Var A,B:real;
Begin
//1
Write('Длина = ');ReadLn(A);
Write('Ширина = ');ReadLn(B);
WriteLn('S = ',A*B);
WriteLn('P = ',2*(A+B));
//2
WriteLn;
Write('Кол-во денег: ');ReadLn(A);
Write('Стоимость покупки: ');ReadLn(B);
WriteLn('Сдача: ',A-B);
//3
WriteLn;
Write('Расстояние: ');ReadLn(A);
Write('Стоимость проезда 1 км: ');ReadLn(B);
WriteLn('Стоимость проезда ',A,' км: ',A*B);
//4
WriteLn;
Write('Цена товара: ');ReadLn(A);
Write('Вес покупки: ');ReadLn(B);
WriteLn('Цена покупки: ',A*B);
//5
WriteLn;
Write('Объём в баррелях: ');ReadLn(A);
WriteLn('Объём в литрах: ',A*159);
End.
4,8
(52 оценок)
Это интересно:
Д
Дом-и-сад
05.07.2021
Как без проблем удалить пятна краски с эмали?...
И
Искусство-и-развлечения
08.05.2020
Как стать режиссером: искусство создания киношедевров...
В
Взаимоотношения
15.07.2022
Как отстаивать свои права в отношениях: 10 советов...
02.05.2023
Как избавиться от безответной любви...
И
Искусство-и-развлечения
08.01.2020
10 советов по тому, как стать хорошим хип-хоп танцором...
С
Стиль-и-уход-за-собой
08.03.2023
Как правильно подобрать галстук?...
И
Искусство-и-развлечения
24.04.2022
Как танцевать под хаус-музыку: узнайте простые шаги и техники...
С
Стиль-и-уход-за-собой
22.08.2021
Как эффективно удалить губную помаду?...
К
Компьютеры-и-электроника
19.04.2023
Как прекратить получение сообщений на Facebook...
Ф
Финансы-и-бизнес
25.01.2020
Как открыть счет в швейцарском банке: необходимые шаги и требования...
Новые ответы от MOGZ: Информатика
228эрагон
02.11.2020
Напишите программу для решения следующей . камера наблюдения регистрирует в автоматическом режиме скорость проезжающих мимо неё автомобилей, округляя значения скорости до целых...
sairma
27.09.2021
нужно написать программу на языке с++ !...
kamilla198
23.03.2021
Напишите программу, которая покажет на экране представленный ниже рисунок. ...
sharoraupova12
19.04.2021
Сформировать массив элемента которого равен квадрата своих индексов....
vika20022003
05.03.2023
Маленький доклад по икт на тему: материнская плата (что это за устроиство? зачем оно нужно? виды)...
Slimede
28.06.2020
Интерпретировать данный код из языка c++ в vba...
ВладаГоликова
06.09.2020
Вязыке запросов поискового сервера для обозначения логической операции или используется символ | а для логической операции и символ & . сербия& хорватия 500 страниц;...
sandershvnz
12.09.2020
Не могу решить потому что я болел...
leo24242
23.02.2021
Дано двовимірний масив а[1..n,1..m], дійсних чисел 1)суму елементів k-стовпця 2)добуток елементів с- рядка іть !...
dimadenisen
12.07.2020
Уисполнителя бета две команды, которым присвоены номера: 1. прибавь b . умножь на 2 (b – неизвестное натуральное число) выполняя первую из них, бета увеличивает число на экране...
MOGZ ответил
/ ) 4. В треугольнике ВМС стороны ВМ и МС равны, точка А лежит на биссектрпсе...
Для острого угла α найдите sinα, cosα, ctg α, если tgα= 5/12...
Почему старому мастеру было стыдно за поведение сына...
Мамандықты таңдау маңызы қандай эссе 90-100 сөз...
1.На VTдиаграмме показан процесс изменения состояния идеального газа. На...
1) 2/5x10= 2) 2/3×3/8= 3) 2 1/3x1 1/5 4) 4 1/3+1 2/3= 5) 5 6/7-2 1/3 =...
Ақтанның ең маңызды 4әрекеті...
вещества встречаются в природе и в трех агрегатных состояний газообразном...
вопроса по данному предложению Астана қаласында «Мәңгілік ел» ескерткіші...
ЕСЛИ МОЖНО ТО СДЕЛАЙТЕ ЭТО ЗАДАНИЕ В ТЕТРАДИ УМОЛЯЮ...
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ
Оформи подписку
О НАС
О нас
Блог
Условия пользования
Авторское право
Политика конфиденциальности
Предпочтения cookie-файлов
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
App
Вход
Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ
Begin
//1
Write('Длина = ');ReadLn(A);
Write('Ширина = ');ReadLn(B);
WriteLn('S = ',A*B);
WriteLn('P = ',2*(A+B));
//2
WriteLn;
Write('Кол-во денег: ');ReadLn(A);
Write('Стоимость покупки: ');ReadLn(B);
WriteLn('Сдача: ',A-B);
//3
WriteLn;
Write('Расстояние: ');ReadLn(A);
Write('Стоимость проезда 1 км: ');ReadLn(B);
WriteLn('Стоимость проезда ',A,' км: ',A*B);
//4
WriteLn;
Write('Цена товара: ');ReadLn(A);
Write('Вес покупки: ');ReadLn(B);
WriteLn('Цена покупки: ',A*B);
//5
WriteLn;
Write('Объём в баррелях: ');ReadLn(A);
WriteLn('Объём в литрах: ',A*159);
End.