November 2018 2 17 Report

Potrzebuję program, który wybiera największą liczbę z 3. Napisany w PASCAL-u. Nie wiem co zrobiłem źle, narazie mam tylko coś takiego:

program Zad;
Uses CRT;
var A,B,C : Integer;
begin
clrscr;
Write('Podaj wartość 1 liczby i naciśnij Enter');
readln(A);
Write('Podaj wartość 2 liczby i naciśnij Enter');
readln(B);
Write('Podaj wartość 3 liczby i naciśnij Enter');
readln(C);
if A>B then
begin if A>C then
Writeln('Największą liczbą jest: ', A);
Else if B>A then
begin if B>C then
Writeln('Największą liczbą jest: ', B);
Else if C>B then
begin if C>A then
Writeln('Największą liczbą jest: ', C);
end.
end.
end.
end.
end.
end.
end.
end.
end.


More Questions From This User See All

Recommend Questions



Life Enjoy

" Life is not a problem to be solved but a reality to be experienced! "

Get in touch

Social

© Copyright 2013 - 2024 KUDO.TIPS - All rights reserved.