Question

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

Answer 1

Вот
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.

Answer 2

сейчас

Answer 3

ок

Answer 4

const h=1;
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:2,'      ',c:4:2);
c:=c+h;
end;
readln;
end.

Answer 5

Спасибо,всё работает)))

Answer 6

=)