Перевести код с паскаля на Си - C (СИ) (156937)

Узнай цену своей работы

Формулировка задачи:

Задача написана под паскаль! Знающим людям прошу,помогите написать ее на Borland C (чистый С)
program lab17_1;
uses crt;
type baza=record
name:string[20];
sename:string[30];
group:string[7];
ser_bal:real;
end;
var stud:array[1..5] of baza;
i:byte;
begin
clrscr;
for i:=1 to 5 do
with stud[i] do
begin
write('Vvedite imja: ');
readln(name);
write('Vvedite familiju: ');
readln(sename);
write('Vvedite grupu: ');
readln(group);
write('Vvedite srednij bal: ');
readln(ser_bal);
clrscr;
end;
for i:=1 to 5 do
with stud[i] do
begin
writeln(name,' ',sename,' ',group,' ',ser_bal:3:2);
end;
writeln('Otlichiki: ');
for i:=1 to 5 do
with stud[i] do
if ser_bal=5 then
writeln(name,' ',sename,' ',group);
readln;
end.

Решение задачи: «Перевести код с паскаля на Си»

textual
Листинг программы
if (pc[i].procesor == k)

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

8   голосов , оценка 3.625 из 5