Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Nastyaprokopova2003
03.10.2022 00:42 •
Информатика
Що спільного та чим відрізняються таблиці кодів символів ASCII,KOI-8U,Windows-1251,Юнікод?
Показать ответ
Ответ:
SalamatMaksetov
20.03.2021 15:47
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.
0,0
(0 оценок)
Ответ:
daniil14537
20.03.2021 15:47
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.
0,0
(0 оценок)
Популярные вопросы: Информатика
ЕмелиЯна
08.11.2022 08:40
Заполнить массив из 15 элементов числами из диапозона от -10 до 10 и вывести в строчку .повторно в строчку заменнив элементы массива не большие 3 их кубами....
kravchenkoev
02.04.2020 07:50
1. вам необходимо оформить несколько документов. запишите, какие возможности текстовых процессоров вы будете использовать в каждом из них (маркированный список, нумерованный...
clicker666
15.03.2021 07:31
Хелп 20 в программе «: =» обозначает оператор присваивания, знаки «+», «-», «*» и «/» — соответ- ственно операции сложения, вычитания, умножения и деления. правила выполнения...
Sashafgbjk
02.04.2022 23:12
Дан линейный массив на n элементов. выполнить циклический сдвиг всех его элементов на один вправо. (последний элемент в таком случае перемещается на начало массива) запрещенные...
nurikparik
30.08.2022 00:40
Как перевести строку (сумму чисел) в число? например, дана строка 1234+43210 и нужно вычислить сумму. паскаль....
Zxcy
14.09.2021 07:39
Дан двумерный массив целых чисел. количество столбцов определено в константе max_col (описывать не надо), количество строк определено в константе max_row (описывать не надо)....
майя155
14.09.2021 07:39
Напишите программу на c++, которая вычисляет факториал введенного числа...
airfgh
09.07.2020 09:37
Задайте массив из 10 элементов с датчика случайных чисел и поменять знак всем нечетным элементам на противоположный.выведите на экран исходный и измененный результат...
mangle56
28.09.2022 04:02
Установите соответствие и допишите таблицу то если 1 градус угла равен 90° 2 смешать синий цвет с красным 3 сумма цифр числа делится на 5 4 существительное отвечает на вопрос...
midman
28.09.2022 04:02
Дан двумерный массив целых чисел. вывести все строки, состоящие только из чисел одного знака в обратном порядке. на pascal abc.net...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
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.
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.