1 вопрос Написать программу на языке паскаль которая вычисляет стоимость покупки в магазине. Для определения будем считать, что в покупной набор входят апельсины и яблоки. С клавиатуры вводится:стоимость 1 кг апельсинов;стоимость 1 кг яблок ;вес апельнов и вес яблок.
2вопрос
Даны длина рёбер a, b, c прямоугольного паралепипида. Найти его объём V=ABC и площадь поверхности S= 2(ab+bc+ac)
mikayilmalik2
2
17.11.2020 15:05
0
Другие вопросы по теме Информатика
dilasagadatova
16.08.2019 14:30
Spale4ik
16.08.2019 14:30
ulya061
25.02.2021 14:58
Abdua245
18.03.2020 18:27
Marina1023
18.03.2020 18:29
ivankornev00
18.03.2020 18:32
474886
18.03.2020 18:37
АннаФилип270406
18.03.2020 18:38
птмпль
18.03.2020 18:39
Nemsix
04.08.2019 23:10
Популярные вопросы
- Прочитай. Какое слово «спряталось» в каждом из слов? Обведи его в...
1 - Прочитай. Озаглавь текст. Запиши заголовок. Увидел маленький Воробей...
3 - Прочитай. Какие звуки обозначены выделенными буквами? Впиши в скобки...
3 - Впиши пропущенные буквы. Эти буквы обозначают парный звонкий или парный...
3 - Назови буквы. Произнеси звук или звуки, которые обозначает каждая...
3 - Впиши в большой дом буквы для парных звонких и глухих согласных звуков,...
1 - Прочитай. Вставь в слова пропущенные буквы. Мне очень нравится жира__...
2 - Прочитай. Впиши в слова пропущенные буквы. Хом к зимою в холод л тый...
1 - Измени каждое слово так, чтобы парный согласный звук был на конце...
1 - Прочитай. Проверь себя: умеешь ли ты правильно обозначать буквой парный...
1
var
a1,a2,b1,b2:integer;
begin
write('Цена за 1кг апельсинов: '); readln(a1);
write('Цена за 1кг яблок: '); readln(b1);
write('Вес апельсинов: '); readln(a2);
write('Вес яблок: '); readln(b2);
writeln('Общая цена: ',a1*a2+b1*b2);
end.
var
a,b,c:integer;
begin
readln(a,b,c);
writeln('V= ', a*b*c);
writeln('S= ',2*(a*b+b*c+a*c));
end.