Program HFi;
var a,b:integer;С,F:real;
begin
writeln(Введіть значення а);
read(a);
writeln(Введіть значення b);
read(b);
writeln(Введіть значення С);
read(С);
writeln(Фаренгейт Цельсій);
for a:=1 to b do begin F:=1.8*C+32;writeln(F:4,C:15:2) end;readln;
end.
Неожиданный символ "С" строка 2
Вот
var a,b:integer;
c,f:real;
begin
writeln(Введіть значення а);
read(a);
writeln(Введіть значення b);
read(b);
writeln(Введіть значення С);
read(c);
writeln(Фаренгейт Цельсій);
for a:=a to b do begin
F:=1.8*c+32;
writeln(f:4,C:15:2)
end;
readln;
end.
Оцени ответ
