Статистика
Всего в нашей базе более 4 327 052 вопросов и 6 446 078 ответов!

ПОМОГИТЕ СОСТАВИТЬ ПРРОГРАММЫ ДЛЯ ПАСКАЛЬ ABC!!! 1) Ввести с помощью read(); трехзначное число N. В нем зачеркули 1-ю слева цифру и приписали ее в

10-11 класс

конце числа. После этого число умножили на 10. Вывести полученное число 2) Ввести с помощью read(); числа A — сторона квадрата, R - радиус окружности (тип real). Выяснить, площадь какой фигуры больше: квадрата или круга.

хНатискХ 02 дек. 2015 г., 22:41:04 (4 года назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Линда95
02 дек. 2015 г., 23:28:16 (4 года назад)

Program Zadacha;
var
    N: integer;
    M: integer;
Begin
    Read(N);
    
    M := N div 100;
    M := M + ((N mod 100) div 10)*10;
    M := M + (N mod 10)*100;
    
    WriteLn(M);    
    
    ReadLn;
    ReadLn;
End.

+ 0 -
Osa35652
03 дек. 2015 г., 2:12:14 (4 года назад)

1)

var n:integer;

begin

   read(n);

   n := 100*(n-100*(n div 100)) + 10*(n div 100);

   write(n)

end.

2)

var a,r:real;

begin

   readln(a,r);

   if(a*a>3.1415927*r*r) then

      writeln('Square!')

   else if(a*a<3.1415927*r*r) then

      writeln('Circle!')

   else

      writeln('Equal!')

end.

Ответить

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

1)Перевести из 10-ой с.с. Во 2-ую ,8-ую ,16-ую с проверкой числа 161,252,353.

2)скорость передачи информации 128бит/с. Передача файла заняла 6мин. Найти размер файла и количество символов ,если 1символ кодируется 1байтом.
3)23211^5+32413^5;65433^7+41451^7
4)65^9•75^9;42^8•35^8
5)сравните:
12^7 и 40^5
1001101^2 и 230^4

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

1. Составить программу для нахождения наибольшего числа из трех чисел.

2. Составить программу для упорядоченное двух элементов по убыванию.

Дан одномерный массив A размерностью N(<=0). Значение массива ввести с клавиатуры, заполнить массив с помощью генератора случайных чисел. найти среднее

арифметическое и количество всех положительных элементов массива))
Помогите составить программу в Паскале, буду благодарна:)

Помогите составить программу для вычисления значения функции y для заданного значения x

у= если x<-3 то
y= √1 - x²
если 1,5<x-3, то
y= в числителе 1 в знаменателе модуль x +2
если x>1,5, то
y=tg x
Составить словесное описание алгоритма, составить блок схему, описать используемые элементы

Помогите составить алгоритм!

Составьте алгоритм(в паскале\на алгоритмическом языке), в котором вычисляются четыре величины: средние температуры зимних месяцев, весенних месяцев, летних месяцев, осенних месяцев.



Вы находитесь на странице вопроса "ПОМОГИТЕ СОСТАВИТЬ ПРРОГРАММЫ ДЛЯ ПАСКАЛЬ ABC!!! 1) Ввести с помощью read(); трехзначное число N. В нем зачеркули 1-ю слева цифру и приписали ее в", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.