1. Информатика
  2. Нужно решить задачу в виде

Нужно решить задачу в виде процедуры Паскаль. Даны три вещественных числа. Составить процедуру нахождения целой части числа. Найти сумму чисел которые получились

Vlad010934 Vlad010934    3   25.11.2021 19:40    0

Ответы
Sandra2516 Sandra2516  31.12.2021 02:00

var

 a,b,c,sum:real;

procedure cel(var x:real);

 begin

   x:=trunc(x);

 end;

begin

 sum:=0;

 write('Введите a,b,c: '); readln(a,b,c);

 cel(a); cel(b); cel(c);

 sum:=sum+a+b+c;

 writeln('Сумма: ',sum);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
olechkapushkareva olechkapushkareva  18.09.2020 10:45
Сәйкестігін анықта. 1 буын 2 буын Алгоритмдік тілдерді қолдану арқылы бағдарламалау Томен жылдамдықпен және төмен сенімділікпен сипатталдық машиналық кодтарда бағдарламаланды...
Potap4uk Potap4uk  18.09.2020 10:47
1) компьютерлік жад ұғымын қалай түсінесіндер 2)ішкі жəне сыртқы жад не үшін қажет3)тұрақты жад қандай қызмет атқарады памагите​...
DesertTwo1 DesertTwo1  27.11.2020 11:56
Технический документ перевели с одного языка на другой (считаем, что это было сделано максимально близко к тексту). Изменился ли смысл документа? Изменился ли его объём?...
Keepcryingpikka Keepcryingpikka  27.11.2020 11:56
3. Числа Майя Ограничение времени 1 секунда Ограничение памяти 64Mb Ввод стандартный ввод или input.txt Вывод стандартный вывод или output.txt Майя – цивилизация Центральной...
IrinaKorolevskih IrinaKorolevskih  27.11.2020 11:56
Однажды к королю Го приехал посол из соседней страны Луа. Посол прибыл на прием с целью обсудить возможный союз двух государств. Он принес в подарок четное число мешков...
gogaefremkov gogaefremkov  27.11.2020 11:56
Можно ли использовать коммутатор в качестве повторителя....
Afakado Afakado  27.11.2020 11:56
Ограничение времени: 1 с Оставшиеся посылки: 100 Паутина Паучок находится в левом нижнем углу клетчатой доски размерами Nх N, где каждая кле как во время движения паучок...
alexandrsub67p08sqm alexandrsub67p08sqm  27.11.2020 11:56
Задание 1. Найдите значения логических выражений: ((0 V 0) V 1) V 1 & (0 V 1) V Задание 2. Упростите логическое выражение: и) A & (B V ¬C) V ¬A & B...
rakitina03 rakitina03  22.01.2021 10:40
1) Прочитать задачу. 2) Выписать известные и неизвестные величины (к известным переменным относятся стороны прямоугольника a,b, к неизвестным – площадь S и периметр P)...
Mika123123 Mika123123  07.06.2019 08:30
Дан массив целых чисел. выяснить: 1) является ли s-й элемент массива положительным числом; 2) является ли k-й элемент массива чётным числом; 3) какой элемент массива...

Популярные вопросы