Информатика | 5 - 9 классы
1) Дано число X.
Вывести на экран квадрат данного числа.
2) Вы пошли в магазин, у вас имеется X руб.
В магазине вы купили тетрадь, ручку и карандаш.
Сколько денег у вас осталось?
Напишите пожалуйста.
На языке Паскаль.
1) Дано число X?
1) Дано число X.
Вывести на экран квадрат данного числа.
2) Вы пошли в магазин, у вас имеется X руб.
В магазине вы купили тетрадь, ручку и карандаш.
Сколько денег у вас осталось?
Решить задачу на языке Паскаля.
Помогите, пожалуйста, написать программу в паскале?
Помогите, пожалуйста, написать программу в паскале.
Дано трехзначное число, если последняя цифра кратна 3, то возвести ее в квадрат, если среднее число равно 0, то увеличить на 2 и вывести результат.
Срочно!
Дано трехзначное число Х, вводимое с клавиатуры?
Дано трехзначное число Х, вводимое с клавиатуры.
Первую цифру этого числа перенесли в конец.
Вывести на экран полученное число.
( работать в паскале).
Напишите программу на языке Паскаль?
Напишите программу на языке Паскаль!
На экран вводится два пятизначных числа.
Найти среднее арифметическое всех четных цифр в наименьшем числе.
Дано 2 числа, вывести на экран целую часть их полусуммы?
Дано 2 числа, вывести на экран целую часть их полусуммы.
Дано число?
Дано число.
Если оно больше 5, то надо умножить на 2.
Результат вывести на экран.
Вывести на экран три числа в порядке, обратном вводу(Язык програмирования Python)?
Вывести на экран три числа в порядке, обратном вводу(Язык програмирования Python).
Дан одномерный массив [ - 50 : 50], нужно вывести числа больше 7, программа на Паскаль?
Дан одномерный массив [ - 50 : 50], нужно вывести числа больше 7, программа на Паскаль.
ПАСКАЛЬ?
ПАСКАЛЬ.
Ввести с клавиатуры 3 числа.
Вывести их на экран в порядке возрастания.
Помогите пожалуйста!
Даны 2 числа А и В?
Даны 2 числа А и В.
Найти наибольшее и наименьшее из них и вывести на экран.
Паскаль.
Помогите пожалуйста.
На странице вопроса 1) Дано число X? из категории Информатика вы найдете ответ для уровня учащихся 5 - 9 классов. Если полученный ответ не устраивает и нужно расшить круг поиска, используйте удобную поисковую систему сайта. Можно также ознакомиться с похожими вопросами и ответами других пользователей в этой же категории или создать новый вопрос. Возможно, вам будет полезной информация, оставленная пользователями в комментариях, где можно обсудить тему с помощью обратной связи.
№1
program q177816090_1 ;
var
a, i : integer ;
begin
Write('A = ') ;
ReadLn(a) ;
for i : = 1 to a do
Write(i, ' ') ;
ReadLn ;
end.
№2
program q177816090_2 ;
var
n, i : integer ;
begin
Write('N = ') ;
ReadLn(n) ;
for i : = 1 to n do
Write(Sqr(i), ' ') ;
ReadLn ;
end.
№3
program q177816090_3 ;
var
n, k, i : integer ;
begin
Write('N = ') ;
ReadLn(n) ;
Write('K = ') ;
ReadLn(k) ;
for i : = 1 to n do
Write(k, ' ') ;
ReadLn ;
end.