Составьте программы на языке программирования для решения : число а вводиться с клавиатуры если оно положительно то извлечь из него квадратный корень иначе возвести его в квадрат результат вывести на экран

На языке pascal var    a,r: real;     begin  writeln('введите число'); readln(a);         if a> 0 then        begin            r: =sqrt(a);             writeln('r= ', r: 6: 3);         end        else        begin            r: =sqr(a);         writeln('r= ', r: 6: 3);     end; end.

1. Scratch - программа для создания алгоритмов.

2. Это последовательность действий, тобиш алгоритм.

3. Не понял суть во дальше выбрать любой параметр.

6.Справа от примечания имеется вкладка "номер страницы" там можно это все сделать.

7.Выберите команду Файл>Предварительный или щелкните мышью на довольно удобной кнопке Предварительный на стандартной панели инструментов. На экране Word появится незабываемый образ вашего документа (рис. 9.1). Обратите особое внимание на то, как расположен документ на странице

8.Презентация - документ или комплект документов, предназначенный для представления чего-либо. Цель презентации — донести до аудитории полноценную информацию об объекте презентации в удобной форме.

PascalABC.NET

Для табулирования любой функции на любом отрезке с любым шагом и любой точностью. При всевозможных значениях "косметика" (которой в предыдущем ответе вообще нет) не нарушается.

procedure Tabulate(a,b,h:real; f:real->real; k:byte:=2; sp:byte:=3);beginvar w := Seq(a, a+Trunc((b-a)/h)*h).Max(x->x.ToString.Length)+k+1;Writeln(' x'.PadLeft(w), ' '*sp, 'y');repeat Writeln(a:w:k, ' '*sp, f(a):0:k); a+=h until a>bend; beginvar a := ReadInteger('Введите a:');Tabulate(1, 10, 1, x->Cos(x+a))end.

Пример работы: