Составить алгоритм и программу вывода на экран удвоенных

Получи верный ответ на вопрос «Составить алгоритм и программу вывода на экран удвоенных значений целых чисел от 5 до 15. . » по предмету Информатика, используя встроенную систему поиска. Наша обширная база готовых ответов поможет тебе получить необходимые сведения!

Новые вопросы по информатике
Напиши обратные действия. Снять — Открыть — Прилететь —
Перевести число 2-чной системы счисления в 10-чную: 1110000/2, 10001101/2
Какими знаками можно обозначить на письме звонкий и глухой удары в барабан?

1) В поезде 17 вагонов, 10-17-купейные, остальные-плацкарт. Ввести № вагона. напечатать вид. 2) Ввести 2 числа. Напечатать их частное или сообщить, что на 0 делить нельзя

Товар стоит a руб. b коп. За него заплатили c руб. d коп. Сколько сдачи требуется получить? программа паскаль

Главная » Информатика » Составить алгоритм и программу вывода на экран удвоенных значений целых чисел от 5 до 15.

Источник: 4i5.ru

Информатика, 9 класс, Одномерные массивы

Вывести на экран удвоенное значение числа, если число положительное — Free Pascal

Нарисуйте блок-схему алгоритма й напишите программу, которая анализирует введенное с клавиатуры число и выдает на экран: + удвоенное значение числа, если число положительное; + абсолютное значение числа, если число отрицательное. Решение

program analiz; uses crt; var a,b,c,x:integer; rez:real; begin Writeln(‘Введите 3-и буквы’); readln(a,b,c); rez:=sqr(a/b)+c; if x>0 then writeln(‘удвоенное значения числа:’) else writeln(‘абсолютное значение числа:’); readln end.

Какие значения надо поставить чтобы выводилось при ответе удвоенное значения числа, а то при минусе и при плюсе значений выводится абсолютное значение числа

Читайте также:
Игровая программа как хорошо нам вместе

Код к задаче: «Вывести на экран удвоенное значение числа, если число положительное»

Листинг программы

var x:integer; begin writeln(‘Введите число’); readln(x); if x

Источник: studassistent.ru

Составить алгоритм и программу вывода на экран удвоенных

triolana

triolana 8 лет назад
Светило науки — 562155 ответов — 388270 раз оказано помощи

Задание №1
var
x:integer;
begin
for x:=5 to 15 do Writeln(‘x=’,x:2,’ y=’,2*x)
end.

Результат выполнения программы:
x= 5 y=10
x= 6 y=12
x= 7 y=14
x= 8 y=16
x= 9 y=18
x=10 y=20
x=11 y=22
x=12 y=24
x=13 y=26
x=14 y=28
x=15 y=30

Результат выполнения программы:
x= 1.0 y= 0.14112
x= 1.3 y=-0.68777
x= 1.6 y=-0.99616
x= 1.9 y=-0.55069

Задание №3
const
n=40;
var
i:integer;
a:real;
begin

СУММА И КОЛИЧЕСТВО ЧЕТНЫХ И НЕЧЕТНЫХ ЧИСЕЛ В ДИАПАЗОНЕ | C# ДОМАШНИЕ ЗАДАНИЯ | #4


for i:=1 to n do
begin Write(‘a’,i,’=’); Read(a); Writeln(‘S=’,sqr(a)) end
end.

Источник: znanija.info

Рейтинг
( Пока оценок нет )
Загрузка ...
EFT-Soft.ru