Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program summa;
var s, a, b, c : word;
begin
write('введите a - > '); readln(a);
write('введите b - > '); readln(b);
write('введите с - > '); readln(c);
s: =a+b+c;
write(' сумма равна ',s);
readln
end.
в не указан шаг изменения x , допустим он равен 1
var
x,y: real;
x: =1;
while x< =10 do
y: =1/x-5;
writeln(y: 8: 2);
x: =x+1;
end;
253(8)=10101011(2)
2в4(16)=1010110100(2)
48(16)=1001000(2)
подвести курсор справа от удаляемого символа
клацнуть бэкспейс
радоваться
Популярные вопросы