составить блок схему и программу T:=(a*10)+(b*15)+(c*20) b:=10 C:=S a-любое число
Answers & Comments
infor5
Const b=10; var a,t,c,s:integer; begin write('Введите а'); read(a); c:=s; t:=(10*a)+(15*b)+(20*c); write('Ответ: ',t); end. По умолчанию s=0 (так как оно не задано).Поэтому с имеет целый тип, тогда вычисляемая величина t также имеет целый тип.Тогда а-любое, но целое число.b описывается как константа (в первой строке программы) Блок- схема скачаете по ссылке
Answers & Comments
var a,t,c,s:integer;
begin
write('Введите а');
read(a);
c:=s;
t:=(10*a)+(15*b)+(20*c);
write('Ответ: ',t);
end.
По умолчанию s=0 (так как оно не задано).Поэтому с имеет целый тип, тогда вычисляемая величина t также имеет целый тип.Тогда а-любое, но целое число.b описывается как константа (в первой строке программы)
Блок- схема скачаете по ссылке