Question

Выдает ошибку: Ожидалась функция, встречена процедура Writeln

Program Вычисление;
var
a,b,c,d,e,f,g,x: integer;
a1,b1,c1,d1,e1,f1,g1,s1,h1: real;
begin
readln(x);
s1:=x/100*30;
h1:=x/100*70;
a1:=s1/3;
b1:=s1/3;
c1:=s1/3;
d1:=h1/100*10;
e1:=h1/100*30;
f1:=h1/100*30;
g1:=h1/100*30;
writeln ('Уверенность:',a1,'руб')('НЗ:',f1,'руб');
writeln ('Мечта:',b1,'руб ');
writeln ('Инвестиции:',c1,'руб ');
writeln ('Запас, страховка:',d1,'руб ');
writeln ('Жизнь:',e1,'руб ');
writeln ('Бытовая техника и т.д:',f1,'руб ');
writeln ('НЗ:',f1,'руб');
end.

Answer 1

Ответ:

Program Вычисление;

var

a,b,c,d,e,f,g,x: integer;

a1,b1,c1,d1,e1,f1,g1,s1,h1: real;

begin

readln(x);

s1:=x/100*30;

h1:=x/100*70;

a1:=s1/3;

b1:=s1/3;

c1:=s1/3;

d1:=h1/100*10;

e1:=h1/100*30;

f1:=h1/100*30;

g1:=h1/100*30;

writeln ('Уверенность:',a1,'руб');

writeln('НЗ:',f1,'руб');

writeln ('Мечта:',b1,'руб ');

writeln ('Инвестиции:',c1,'руб ');

writeln ('Запас, страховка:',d1,'руб ');

writeln ('Жизнь:',e1,'руб ');

writeln ('Бытовая техника и т.д:',f1,'руб ');

writeln ('НЗ:',f1,'руб');

end.

Объяснение: