Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
89521706957
31.08.2020 12:08 •
Информатика
Нужна ваша ! нужно в кумире сделать эти фигуры напишите решение . использовать надо рисователь. надеюсь на вашу
👇
Увидеть ответ
Открыть все ответы
Ответ:
Лейла0044
31.08.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
31.08.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 оценок)
Это интересно:
К
Кулинария-и-гостеприимство
15.08.2021
Как приготовить змею: рецепты и рекомендации...
О
Образование-и-коммуникации
28.09.2022
Как разработать сюжет истории и захватить внимание читателя...
С
Семейная-жизнь
28.05.2020
Как произвести впечатление на маму девушки?...
02.01.2022
Как справиться с угрозой: основные советы и рекомендации...
К
Компьютеры-и-электроника
23.03.2021
Как реактивировать аккаунт Facebook: полное руководство...
О
Образование-и-коммуникации
01.12.2021
Как сосредоточиться на выполнении домашней работы: советы для школьников и студентов...
К
Компьютеры-и-электроника
17.10.2022
Как установить звуковую карту: шаг за шагом...
Ф
Финансы-и-бизнес
04.12.2021
5 шагов проведения анализа экономической целесообразности...
В
Взаимоотношения
09.04.2021
Как жить одному: советы и рекомендации для современного человека...
З
Здоровье
30.06.2020
Как обезопасить себя от сна, когда усталость уже на грани...
Новые ответы от MOGZ: Информатика
AvdAda24
07.07.2021
Як правильно виконати операцію присвоєння Pascal (записати число 5 в змінну а) 1) a equal 5 2) a=5 3)a is 5 4) a :=5 Алфавіт мови Pascal складається з 1) латинський 2) англійський...
tumoannasehko
10.05.2021
Создайте программу на языке Паскаль, которая возводит нечётное число в квадрат, а чётное — в куб....
vlad22803
24.12.2021
Иван открыл текстовый редактор и набрал слово собака (без кавычек, и пробелов и знаков препинания), после него поставил запятую и пробел, затем выделил весь текст, скопировал...
nastiatsiupak
04.04.2023
1. Чему равно х = 1678 – 5916? 1118 2) 11116 3) 368 4) 3616 2. Записать в однобайтовом формате прямой код числа 103. 3. Найти десятичное представление числа, записанного...
olechka162
08.01.2021
Вычислите необходимый объем видеопамяти для графического режима, если разрешение экрана монитора 1024х768, а количество цветов в палитре 256....
dizi17
08.01.2021
Мощность алфавита равна 64. сколько кбайт памяти потребуется, чтобы сохранить 128 страниц текста, содержащего в среднем 256 символов на каждой странице?...
mockingbird12
17.10.2020
Що означає даний фрагмент програми s :=0; for i:=1 to 10 do s := s+a[i]...
Himop
22.01.2023
Разгадайте кроссворд по разделу IV «Программирование алгорит- мов на языке программирования Python», записав слова по горизон- тали и вертикали (рис. 4.11). По горизонтали:...
лппериоаоаопоопо
24.10.2021
Написать программу чтобы паскаль вывел на экран числа 11 12 13 14 21 22 23 31 32 41 написать программу чтобы паскаль вывел на экран числа 1 2 3 4 1 2 3 1 2 1 написать программу...
Nauchniki
01.01.2020
С++ Саша и Катя учатся в начальной школе. Для изучения арифметики при этом используются карточки, на которых написаны цифры (на каждой карточке написана ровно одна цифра)....
MOGZ ответил
. Вычислить предел обнаружения ионов меди (II) реакцией с купроном, если...
Б) 19 17/35-(8 22/35-х)=16 28/35...
Решите 18x в квадрате - 9x -5=0...
сделать кроссворд Кроссворд по истории со словами: История, архив, библиотека,...
НАПИШИТЕ сообщение о любом мифе НЕ древней греции...
Problem. 1.10 4 Listen again and write true or false. Correct the false...
Составь одно предложение на слово мұражай Мухтар Әуезов...
Придумать критерии определения уровня развития страны. 1)Ввп 2) экономика...
Какое предание похоже на миф?...
Выписать все наречия! !Изи Из всех ч.стей речи гл..гол самая сложная...
Полный доступ к 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.