нужно написать программу,Помогите пожалуйста

Нужно написать программку,
Помогите пожалуйста

Задать свой вопрос
Вова
Для тебя надо программку только для номера 1?
Леонид Хроленок
и 2
Юленька Будашкина
Программка на каком языке обязана быть?
Вадим Юндев
program test; // Заглавие программы testvark,t:real; // переменныеbegin // Начало кодаWriteLn('Введите значение t'); // Выводим текстReadLn(t); // Считываем значение в переменнуюif t>0 then k:= sqr(t)+7*t; // sqrt корень.if t=0 then k:=3;if t<0 then k:= sqrt(-t);WriteLn(k);end.
Таисия Полишученко
жалко 2 выводит с излишними знаками.
1 ответ

Пишу на языке PASCAL.

1

program name1; // Заглавие программки name1

var a: integer; // Объявляем переменные

begin

WriteLn('Введите число: ');

  ReadLn(a);

if agt;0 then writeln('Число положительное');

if a=0 then writeln('Число одинаково 0')

 else writeln('Число отрицательное');

end.

Сережа Норвин
Номер 2.
Артем
program test; // Заглавие программки testvark,t:real; // переменныеbegin // Начало кодаWriteLn('Введите значение t'); // Выводим текстReadLn(t); // Считываем значение в переменнуюif t>0 then k:= sqr(t)+7*t; // sqrt корень.if t=0 then k:=3;if t<0 then k:= sqrt(-t);WriteLn(k);end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт