Вход
Регистрация
О проекте Как заработать?
53

Pascal abcНапишите программу…

whitele 01 сентября 2022

Pascal abcНапишите программу, которая возводит в квадрат введенное целое число, если оно отрицательное, и выводит на экран результат.

категория: информатика
ответить
в избранное

69

Program abc; var i: integer; beginread (i); if i<0 theni: =sqr (i); write (i); end.

пользователи выбрали этот ответ лучшим
комментировать
в избранное ссылка отблагодарить

Знаете другой ответ?
Другие вопросы по информатике
avainta
01 сентября 2022
1
ответ
Дайте наиболее точное общее имя каждой группе объектов
ddv68
01 сентября 2022
1
ответ
Начертить синим цветом контур буквы М на кумире
janjak
01 сентября 2022
1
ответ
Можно ли выставление учителем оценки за ваш ответ на уроке назватьформализацией
platinum66
01 сентября 2022
1
ответ
Дано натуральное число N. Напишите программу для вычисления суммы вида 1\1 (в квадрате)+1\2,+1\3,+1\N (вквадрате)
uskoritel
01 сентября 2022
1
ответ
Выпишите основные понятия главы 1 и дайте их определения
vovanfun
01 сентября 2022
1
ответ
1) Сколько бит в 1/4 кбайт? 2) Объем книги 300 кбит. Сколько книг мозно вместить на 1 мбайт?! 3) Сколько дискет объемом 360 кбит надо для хранения учебника, в котором 120 страниц и на каждой странице по 40 строк, по 60 знаков.
rom4eg
01 сентября 2022
1
ответ
Помогите сделать пожалуйста! 1) В текстовом процессоре (редакторе) WordPad наберите слово «Информатика» и сохраните его в документе с именем D1, указав тип файла Текстовый документ. Запишите имя _________ и размер__________ созданного файла Объясните, почему созданный файл имеет именно такой размер: _______________ 2) В текстовом процессоре WordPad наберите Информатика и сохраните его в документе с именем D2 указав тип файла Текстовый документ в кодировке Unicode Запишите имя ______ и размер ________ созданного файла. Сравните размер нового файла с предыдущим ___________________________________________________ Чем это объясняется? _______________________________ 3) Все то же, но имя D3 и тип файла Файл RTF Запишите имя ________ и размер ________ созданного файла. Сравните размер нового файла с предыдущим. ______________________________________________ Чем это объясняется? _________________________
roman_v
01 сентября 2022
1
ответ
Скласти алгоритм розв*язання лінійного рівняння a*x+b=0
olegon26rus
01 сентября 2022
1
ответ
Определить среди 3 введенных чисел (a,b,c) количество отрицательных и положительных. Если больше отрицательных то найти произведение этих 3 чисел, аиначе найти max из трех
Задайте свой вопрос

ПОПУЛЯРНОЕ
avainta, 01 сентября 2022
Дайте наиболее точное общее имя каждой группе объектов
ddv68, 01 сентября 2022
Начертить синим цветом контур буквы М на кумире
janjak, 01 сентября 2022
Можно ли выставление учителем оценки за ваш ответ на уроке назватьформализацией
platinum66, 01 сентября 2022
Дано натуральное число N. Напишите программу для вычисления суммы вида 1\1 (в квадрате)+1\2,+1\3,+1\N (вквадрате)
uskoritel, 01 сентября 2022
Выпишите основные понятия главы 1 и дайте их определения
vovanfun, 01 сентября 2022
1) Сколько бит в 1/4 кбайт? 2) Объем книги 300 кбит. Сколько книг мозно вместить на 1 мбайт?
rom4eg, 01 сентября 2022
Помогите сделать пожалуйста!
roman_v, 01 сентября 2022
Скласти алгоритм розв*язання лінійного рівняння a*x+b=0
olegon26rus, 01 сентября 2022
Определить среди 3 введенных чисел (a,b,c) количество отрицательных и положительных
27400
Алгебра
14821
Английский язык
14216
Биология
7369
Другой
720
Экономика
18828
Физика
8304
География
15850
Геометрия
5255
Информатика
11818
История
23332
Химия
15992
Литература
73118
Математика
8152
Обществознание
465
Правоведение
46271
Русский язык
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...