Перевод Программы Из Паскаля На C

Статус
Закрыто для дальнейших ответов.

FaRReLL

New Member
07.12.2014
4
0
22
#1
Код:
program vlad;
uses crt;
var
m:integer;
a:real;
begin
clrscr;
write('a: ');readln(a);
for m:=-5 to 5 do
if m<0 then
writeln(m:5,' : ',a*m/3:5:2)
else
writeln(m:5,' : ' ,3*a*m:5:2);
readln;
end.
 
Статус
Закрыто для дальнейших ответов.