Статистика
Всего в нашей базе более 4 327 657 вопросов и 6 445 963 ответов!

Напишите программу на языке Паскаль, для решения следующей задачи:

10-11 класс

Для любого четырехзначного вводимого числа найти сумму второй и предпоследней цифры).
(Подсказка. Используйте тип данных integer и операции div и mod)

SweetMango 15 апр. 2013 г., 11:29:34 (10 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Freezek
15 апр. 2013 г., 13:10:01 (10 лет назад)

var a,b,c,d:integer;
begin
readln(a);
b:=(a div 100)mod 10;
c:=(a mod 100)div 10;
d:=b+c;
writeln(d);
readln;
end.

+ 0 -
Tanua197474
15 апр. 2013 г., 14:40:13 (10 лет назад)

var a,b,c:integer;
begin
read (c);
a:=c div 100;  a:=a mod 10;
b:=c div 10;  b:=b mod 100;
write(a+b);
end.

Ответить

Другие вопросы из категории

помогите пожалуйста а2..........
Pascal ABC, очень срочно. 1. Чтобы выявить самого драчливого разбойника, Али-Баба провел турнир,во время которого каждый его разбойник

подрался с каждым из оставшихся. За победу присваивалось-7 очков,за ничью-5,за поражение-2.Написат­ь программу, определяющую победителя.

2. Царевна Несмеяна каждому из претендентов на её руку и сердце задаёт М вопросов. За очень понравившийся ответ 2 балла, за не очень понравившийся - 4, за не очень не понравившийся - 6, за очень не понравившийся - 8. Написать программу, определяющую самого понравившегося (набравшего наим. количество баллов) претендента.

1) объём файла 57 килобайт, скорость 16 кило бит в секунду. Найти время.

2)файл скачивался за 2 минуты 15 секунд при скорости передачи 16 килобит в секунду. найти время. РЕШИТЕ ПОЖАЛУЙСТА ПОДРОБНО

Задачка из лабораторной работы по программированию C++.

Не могу разобраться что требуется найти!
1. Вычислить с использованием функции наименьшие элементы в строке и сумму
номеров строк и столбцов, в которых они расположены, для матрицы A(10,15).
Результаты формировать в одномерных массивах M(10) и S(10).

Читайте также

Напишите программу на языке паскадь для решения следущей задачи.

Известна площадь квадрата. Найдите периметр и диагональ квадрата

1) Напишите пожалуйста программу (на языке BASIC) вычисления по длинам двух сторон треугольника и углу между ними длины третьей стороны и двух других

углов.
2)
Напишите пожалуйста программу (на языке BASIC) для определения подобия:
а) двух прямоугольников по двум смежным сторонам;
б) двух треугольников по трем сторонам.



Вы находитесь на странице вопроса "Напишите программу на языке Паскаль, для решения следующей задачи:", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.