Решить ! плачу 50 ! паскаль! определить стоимость набора конфет в который входят 1)красная шапочка 200 граммов 2)алые паруса 150 граммов 3)чародейки 100 граммов если известна стоимость за 1 кг + блоксхема

KekCheburashka KekCheburashka    2   02.07.2019 06:00    7

Ответы
vaider222 vaider222  26.07.2020 13:51
Var a,b,c,d,e,f,g:real;
begin
write ('Введите цену конфет красная шапочка (за 1 кг): ');
readln (a);
write ('Введите цену конфет алые паруса (за 1 кг): ');
readln (b);
write ('Введите цену конфет чародейки (за 1 кг): ');
readln (c);
d:=(a/1000)*200;
e:=(b/1000)*150;
f:=(c/1000)*100;
g:=d+e+f;
WRITELN;
write ('Стоимость набора конфет составила: ',g,' рублей');
end.

Блок-схема в прикреплённых файлах

Решить ! плачу 50 ! паскаль! определить стоимость набора конфет в который входят 1)красная шапочка 2
Решить ! плачу 50 ! паскаль! определить стоимость набора конфет в который входят 1)красная шапочка 2
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика