Презентация на тему по информатики на тему Тандау операторы (9 класс)

b: integer;
Begin
Write (‘a,b енгіз’);
Readln (a,b);
If a>b then Write (‘max

a’) else Write (‘max:=b’);
End.

программа құру керек.
Program day;
Var kun: integer;
Begin
Write(‘күннің аптадағы реттік нөмірін

енгізіңдер:’)
Read (kun);
Case kun of
1: writeln(‘дүйсенбі’)
2: writeln(‘сейсенбі’)
3: writeln(‘сәрсенбі’)
4: writeln(‘бейсенбі’)
5: writeln(‘жұма’)
6: writeln(‘сенбі’)
7: writeln(‘жексенбі’)
else writeln (‘1..7 аралығындағы сандарды енгізіңдер’);
End.