stifler2103
Nowy
Dołączył: 28 Mar 2017
Posty: 2
Przeczytał: 0 tematów
Ostrzeżeń: 0/5
|
Wysłany: Wto 18:09, 28 Mar 2017 Temat postu: Pascal gdzie popełniłem błąd |
|
|
Witajcie, jestem zielony w Pascalu i prosiłbym o pomoc w moim kodzie nie wiem już co zrobić
Program Stale;
const
max = 20.0;
min = 3.0;
i: integer=1;
znak: char=’t’;
var
x: real;
j,k: integer;
begin
writeln (‘Wartosc max wynosi: ‘, max);
writeln (’Wartosc min wynosi: ‘, min);
writeln (‘Wartosc i wynosi: ‘, i);
writeln (‘Wartosc znak wynosi: ‘, znak);
writeln (‘Wartosc x wynosi: ‘, x);
writeln (‘Wartosc j wynosi: ‘, j);
writeln (‘ Wartosc k wynosi: ‘, k);
max := max +10.5;
writeln (‘Wartosc max wynosi: ‘, max);
i := i + 1;
writeln (‘Wartosc i wynosi: ‘, i);
x := 13.71;
writeln (‘Wartosc x wynosi: ‘, x);
znak := znak + 3;
writeln (Wartosc znak wunosi:’, znak);
readln
end.
Post został pochwalony 0 razy
|
|