сервис вопросов и ответовДано целое положительное четырехзначное число. Напишите программу, позволяющую определить сумму двух первых цифр и разность двух последних цифр
5-9 класс|
|
Сашуля19972404
20 марта 2017 г., 20:18:18 (7 лет назад)
Кисамурлав
20 марта 2017 г., 22:59:43 (7 лет назад)
program fatzz051;
var a:integer;
begin
readln(a);
writeln('Sum= ',a div 1000+a div 100 mod 10);
writeln('Razn=',a div 10 mod 10-a mod 10);
end.
Vikus4a
21 марта 2017 г., 1:42:17 (7 лет назад)
var m, n, i, j: integer;
begin
readln(n);
m := n div 1000;
n := n mod 1000;
i := n div 100;
n := n mod 100;
j := n div 10;
n := n mod 10;
writeln(m, '-', i, '=', m + i, ' ', i, '-', j, '=', i - j);
end.
Ответить
Другие вопросы из категории
помогите пожалуйста! вообщем задачи надо составить по паскалю
1. Дан массив состоящий из 12 случайных целых чисел от -5 до 12. Все его элементы умножить на последний элемент.
2.Дан массив состоящий их 7 вещественных чисел. Из всех положительных элементов массива вычесть элемент с номером k, из всех отрицательных n ( числа k и n вводятся с клавиатуры). Нулевые элементы оставить без изменения.
3. В массиве хранится информация о росте 25 челловек. Определить, на сколько рост самого высокого человека превышает рост самого низкого.
4. Дан массив целых чисел. Найти номер первого четного элемента массива (массив просматривайте с конца, используя цикл for...downto). Если четных елементов нет. то должно быть напечатано соответствующее сообщение.
Читайте также
Дано целое положительное четырехзначное число. Напишите программу, позволяющую определить двузначное число, в котором число десятков соответствует
первой цифре заданного числа, а число единиц-последней. Например: 3234 => 34.
Помогите по программе paskal : 1.дано целое число.напишите программу которая уменьшает на 2 модуль этого числа и выводит на экран монитора
результат
2.дано целое число.напишите,программу которая выводит на экран последнюю цифру данного числа,затем возводит ее в квадрат и выводит на экран монитора результат
Дано целое положительное четырехзначное число а.
Найти минимальную цифру среди первых трех цифр числа, а также определить:первая или вторая цифра числа четная,или обе цифры четные,или обе цифры нечетные.Результаты вывесите на экран.
Паскаль напишите пожалуйста программу Срочно, прошу!!! Даны действительные положительные числа a, b, c, которые задают длины сторон треугольника
и угол между ними. Напишите программу, позволяющую найти длину третьей стороны и два остальных угла.
1.Дано целое число составить программу которая определяет оканчивающие данное число цифрой семь.
2.Дано 2х значное число составить программу с помощью которой можно отпределить входит ли в это число цифра шесть.
Вы находитесь на странице вопроса "Дано целое положительное четырехзначное число. Напишите программу, позволяющую определить сумму двух первых цифр и разность двух последних цифр", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.