ДАЮ 30 БАЛЛОВ! Решите задачу по информатике, 6 класс. Нужно составить программу для PascalABC.
Задача:
Составьте программу, которая рассчитывает стоимость каждой покупки. Цена и количество купленных карандашей и ручек вводятся с клавиатуры. Все данные выведите в виде следуйщей таблицы, которая изображена НА ФОТО.
ПОМОГИТЕ!!!!!НАДО СРОЧНО!!!!!!
Приложения:
![](https://st.uroker.com/files/965/965fd25bca6b9953ad39c082cf5e6db6.jpg)
Ответы
Ответ дал:
0
var
c1, c2, p1, p2: integer;
begin
write('Введите стоимость карандаша:');
read(p1);
write('Введите количество купленных карандашей:');
read(c1);
write('Введите стоимость ручки:');
read(p2);
write('Введите количество купленныx ручек:');
read(c2);
writeln;
writeln('Наименование Цена за 1шт. Кол-во Стоимость');
writeln('Карандаши ', p1, ' ', c1, ' ', p1 * c1);
writeln('Ручки ', p2, ' ', c2, ' ', p2 * c2);
end.
c1, c2, p1, p2: integer;
begin
write('Введите стоимость карандаша:');
read(p1);
write('Введите количество купленных карандашей:');
read(c1);
write('Введите стоимость ручки:');
read(p2);
write('Введите количество купленныx ручек:');
read(c2);
writeln;
writeln('Наименование Цена за 1шт. Кол-во Стоимость');
writeln('Карандаши ', p1, ' ', c1, ' ', p1 * c1);
writeln('Ручки ', p2, ' ', c2, ' ', p2 * c2);
end.
Вас заинтересует
1 год назад
1 год назад
6 лет назад
8 лет назад
8 лет назад
8 лет назад