Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
1. Уведення даних у клітинки електронних таблиць, їх редагування та форматування;.
2. Обчислення за формулами та з використанням вбудованих функцій.
3. Побудова діаграм і графіків за даними, що містяться в клітинках електронних таблиць.
4. Друкування електронних таблиць, діаграм і графіків.
5. Робота з файлами (відкриття, збереження, перегляд тощо).
я так понимаю надо написать паскале
1uses crt;
2var a,b,c: real;
3 i: byte;
4 begin
5clrscr;
6writeln('введите 3 действительных числа: ');
7readln(a);
8if a> =0 then a: =a*a else a: =sqr(sqr(a));
9 readln(b);
10if b> =0 then b: =b*b else b: =sqr(sqr(b));
11readln(c);
12if c> =0 then c: =c*c else c: =sqr(sqr(c));
13write('a=',a: 0: 2,' b=',b: 0: 2,' c=',c: 0: 2);
14readln
15end.
700 иероглифов было в древнем письме
Популярные вопросы