Язык C++.
#include <iostream>
#include <cmath>
const double pi = 3.1415;
using namespace std;
int main() {
double r;
cout << "Введите радиус: " << endl;
cin >> r;
cout << "Длина окружности = " << 2*pi*r << endl << "Площадь = " << pi*pow(r,2) << endl;
}
28800 бит/с = 3600 байт = 3,515625 Кб
Ответ: <span>а)3600 байт</span>
Program A1;
var a,b:Integer; {Можно и real}
begin
readln (a,b);
if a<b then writeln ('Число а больше числа б') else writeln ('Число б больше числа а');
end.
У Ани синяя по условию.
У Вари не белая (и не синяя, так как она у Ани). Значит, красная.
Остаётся одна белая флешка. Она у последней девочки: у Маши.
var a, b, s, p: real;
begin
write(‘Чему равны стороны прямоугольника: ‘);
readln(a,b);
p:=2*(a+b);
s:=a*b;
writeln(‘Периметр прямоугольника: ‘, p);
write(‘Площадь прямоугольника: ‘, s)
end.
Результат работы:
Чему равны стороны прямоугольника: 2 5
Периметр прямоугольника: 14
Площадь прямоугольника: 10