Войти Регистрация Спроси ai-bota

Http://www.alegrium.com/sgi/2/efrad1

Показать ответ

Ответ:

damirsemenov2

31.05.2022 22:14

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 оценок)

Ответ:

anavidyan920

31.05.2022 22:14

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 оценок)

Популярные вопросы: Информатика

denisgolubev1

22.07.2022 23:17

НАДО НА ЯЗЫКЕ PYTON МАТЕМАТИКОЙ НЕ НАДО НАДО НА ПАЙТОНодин банан стоит 100 тенге.напечатайте таблицу стоимости 2,3, 30 штук бананов...

feyaandkisa

20.05.2023 02:19

Выполнить сортировку только четных индексов элементов массива в Паскале...

Zahardenicuk

03.12.2022 13:13

Определите, какие символы будут вставлены в текстовый документ путем ввода их кода при нажатой клавише alt, для кодов 1234, 3754, 8986, 9708, 9415, 10001, 10239...

MrDog2005

11.08.2020 15:10

Водномерном массиве из n чисел вывести на экран количество положительных и отрицательных элементов. 1ø cls 2ø rem определяет количество положительных и отрицательных элементов...

rayanova81

11.08.2020 15:10

1011010 - 1011010 11010 - 11010 найти обратный и дополнительный код, проверить путем прямого кода...

Akhram

11.08.2020 15:10

Музыкальный фрагмент был записан в формате стерео (двухканальная запись), оцифрован и сохранён в виде файла без использования сжатия данных. размер полученного файла – 28 мбайт....

Lesawolk12

20.01.2020 21:04

1) какие субъекты информационной деятельности вы знаете? 2) что относится к образовательным электронным ресурсам? 3) по каким параметрам классифицируют информационные ресурсы?...

nastyakarina112

14.03.2021 17:29

Визначте значення логічного вирзу: a or a and b, якщо a = True, b = False....

anetta3568

08.01.2022 04:50

Подробности вопроса: вставить вместо пропусков слова так чтобы получились рифмы 1)…..могуч …..туч 2)……море ……просторе 3)……стала ………пропала 4)…….(по) ней ……….елисей....

Zeus41

08.01.2022 04:50

Найдите слово, которое неправильно разделено для переноса 1)яго-да 2)поз-вать 3)рас-пи-са-ние 4)вскрик-нуть....

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку