Составьте программу в паскаль:Букет роз стоит 370 рублей.Сколько стоят 2,3,4,5 букетов?
Var a,b,c,d,e:integer; begin write('Количество букетов'); read(a); b:=370*a; write('Цена',b); end.
1. 370 умножить на 2,3,4,5 по очереди и сложить