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 описывается как константа (в первой строке программы)
Блок- схема скачаете по ссылке
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.