Wikipedia

Результаты поиска

вторник, 19 мая 2015 г.

Домашнее задание.
Пользователь вводит номер билета, состоящего из 6 чисел ,необходимо определить,билет счастливый или нет.
 
Program bilet;
const n=6;
var a:array of real;
    i,x,y:real;
begin
writeln('Vvedite chislo chaslivogo bileta');
for i:=1 to n do 
 begin 
 readln(a[i]);
end;
x:=a[1]+a[2]+a[3];
y:=a[4]+a[5]+a[6];
if x:=y then writeln('bilet chastlivuy') else
writeln('bilet ne chactlivuy');
end.