Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
на pascal:
program sonik;
uses crt;
var a,b,c: string;
begin
readln (a); readln (b); readln (c);
writeln (' фигуры: ',a,b,c);
end.
writeln(x) вот этой! потому что если взять в ковычки выведет х
ошибка в том что натуральный логарифм (-1) не существует
program summa; uses crt; var n,i: integer; s: real;
p1,p2: integer; begin clrscr; writeln ('vvedite n'); readln (n); s: =0;
p1: =-1;
p2: =2; for i: =1 to n do
begins: =s+p1/p2;
p1: =-p1;
p2: =p2*2;
end; writeln ('s=', s); readln; end.
a1=8;
a2=a1*10=80;
a3=a2-a1=72;
b1=a2/4=20;
b2=(b1-a1)/6=2;
ответ: a1=8; a2=80; a3=72; b1=20; b2=2
Популярные вопросы