Формулы: C=2πR, S=πR²
program zadacha;
uses crt;
var r: integer;
c, s: real;
begin
clrscr;
write ('vvedite radius: ');
readln (r);
c:=2*pi*r;
s:=pi*sqr(r);
writeln ('dlina okruzhnosti=', c:0:5, ', ploschad=', s:0:5);
readkey;
end.
1)
const d=100;
var a:1..20 ;
begin
Write('Введите кол-во долларов: '); readln(a);
Writeln('Кол-во рублей: ', a*d:0:2);
end.
2)
var a:1..20 ;
d:real;
begin
Write('Введите кол-во долларов: '); readln(a);
Write('Введите курс доллара: '); readln(d);
Writeln('Кол-во рублей: ', a*d:0:2);
end.
1 = 1
2 = 2
3 = 3
4 = 2
5 = 2
6 = 4
7 = 1
8 = 4
9 = 5
<span>10 = 1</span>
Может быть:
<span>"Прикладной программист — программист, работающий над прикладным программным обеспечением. "
</span>Т.е. Создание прикладных программ.