logo
Войти Регистрация Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Alisa1999WWW
Alisa1999WWW
15.08.2021 14:38 •  Информатика

Составьте программу которая вводит число с клавиатуры и если оно отрицательное возводит его в квадрат блок схема

Показать ответ
Ответ:
mikreaz
mikreaz
21.08.2020 07:22
Program z_1;
var a:real;
begin
read a;
If a>0 then writeln(a) else writeln(a*a);
end.
0,0(0 оценок)
Популярные вопросы: Информатика
liquidchannel
liquidchannel
10.09.2021 23:27
Егер k=10 болса, псевдокодтың орындалу нәтижесі неге тең болады?берілгені| k 0қажет| S=1+2+3+...+kбасы бүт iенгізу k; S:=0цб үшін і 1- ден k-ға дейін S=S+iцсшығару S=...
semak03
semak03
25.10.2022 09:17
(66)5. Определите тип алгоритма для указанных команд.КомандаТип алгоритмарозовсказать Привет!ауруларБратуразсудлануваат да сезарларданEERGEGEBERGНА НЕЕЕНЕ СЕРЕВОД НАЗВАНЕЗАповторить...
whatareyoudoing
whatareyoudoing
03.08.2022 03:14
Составить программу, которая по номеру месяца, введенного с клавиатуры, выводит количество дней в нем. в программе учесть количество дней в феврале для високосного и не...
Milediteul
Milediteul
30.10.2021 11:37
•файл размером 64 кбайт передаётся через некоторое соединение со скоростью4096 бит в секунду. определите размер файла(в кбайт), который можно передать за то же время через...
китии2
китии2
06.06.2021 21:28
Определите количество символов в сообщении, алфавит которого состоит из 16 символов, информационный объём равен 788 бит (с решением)...
dimonnovikov0
dimonnovikov0
11.08.2020 22:36
1)даны две строки. вывести на экран строку большей длины. 2)дана строка символов. определить, есть ли в ней хотя бы одна буква «с». нужно написать программы в паскаль,...
sалаьы
sалаьы
27.01.2023 03:00
Существует ли pascal на айфон?...
raydin
raydin
01.05.2022 11:50
Вот команды,которые может выполнять черный ящик: сосчитать число гласных.сосчитать число согласных...
Pomogu0pogalycta
Pomogu0pogalycta
04.04.2022 23:01
Нужно ! проект делаю . 5 класс. какой продукт проекта может быть у проекта интернет: вред или польза ?...
Zippergorskii
Zippergorskii
02.05.2023 22:34
Написать программу: население увеличивается на 5% ежегодно. в 2014 численность население составила а человек. спрогнозируйте численность в каждом году, вплоть до 2024....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота