1.перменная
2. readln(a, b);
3. writeln(a + b);
4. writeln( ((a + b) / 2): 10: 4);
5. begin, end.
1.
program dwozn;
var
n, i: integer;
begin
write('n= ');
readln(n);
for i: = 1 to n do
begin
if (a> 9) and (a< 100) then writeln('да')
else writeln('нет');
end;
end.
2.
program n1;
var a,b,c: integer;
begin
readln(a,b,c);
if (c> b) and (c> a)and (b> a) then writeln('по росту.')
else writeln('не по росту! ');
end.
Поделитесь своими знаниями, ответьте на вопрос:
Каким устройствам компьютер может исполнять программы и обрабатывать данные?