Program zapisujący plan lekcji w pascalu

Plan lekcji w Pascalu

Napisz program, który zapisze podany plan lekcji do pliku tekstowego na wybrany dzień.

program lekcj2a;
var plik:text;p:char;
lekcja:string[20];
begin
assign(plik,'c:\plan_lekcji.txt');
rewrite(plik);
repeat
begin
write('Podaj dzień: ');
readln(lekcja);
writeln(plik,lekcja);
write('Zakończyc?t/n');
readln(p);
end;
until p='t';
close(plik);
end.

Do działania programu nie wymagane jest istnienie pliku plan_lekcji.txt. Program sam go utworzy!
Zapisywanie planu lekcji do pliku

Strona wyszukana na takie tagi:

  • pascal wyszków plan zajęć
  • pascal nysa plan lekcji
  • pascal wyszków plan lekcji
  • pascal wyszków