-если первая дата больше второй.паскаль.тема записи
в чем ошибка??
type date = record day: 1..31; month: 1..12; year: integer ; end;
var a: date := (day: 1; month: 4; year: 2015); b: date := (day: 1; month: 4; year: 2014); c:integer;

procedure OutDate(d: date);begin with d do writeln(day, '.', month, '.', year);end;
function Srawn(x, y: date): -1..1;beginif x.year > y.year then writeln( 1) else writeln(-1) ; if x.year = y.year then if x.month > y.month then writeln(1) else writeln(-1); if x.year = y.year then if x.month = y.month then if x.day > y.day then writeln(1) else writeln(-1); if x.year = y.year then if x.month = y.month then if x.day = y.day then writeln(0); end; begin OutDate(a); OutDate(b); c:=srawn(a,b); writeln('otwet:', c);end.

10-11 класс информатика ответов 6

Ilyakishuk / 15 июля 2013 г., 2:52:00

(Программа Паскаль) 1)Заполните массив элементами арифметической прогрессии. Её первый элемент и разность нужно ввести с клавиатуры. 2)

Заполните массив степенями числа 2( от 2(в первой степени) до 2(в N степени)

10-11 класс информатика ответов 2

Andreevaoks / 17 янв. 2014 г., 13:13:39

Даны 2 двузначных целых числа X и y.Найти D=MAX{x+y;y-x}+3,E=MIN{x^2+y^2;y^2+x*y}-4.если D<E,то к переменной D прибавить первую цифру числа

E,иначе из числа взять корень степени, равной второй цифре числа

если есть умеющте напишите,пожалуйста,программу в Паскале

10-11 класс информатика ответов 1

Dasvol37 / 23 апр. 2015 г., 18:43:21

Помогите, пожалуйста!!!

Составить программу на языке Турбо-Паскаль, печатающую значение true, если указанное высказывание является истинным, и false в противном случае: Данные числа x, y являются координатами точки, лежащей в первой координатной четверти

10-11 класс информатика ответов 1

Elizaveta1146 / 07 сент. 2014 г., 23:10:34

На международных соревнования по прыжкам в воду первые пять мест заняли спортсмены из Гремании,Италии,Китая,России и Украины.Еще до начала соревнований

эксперты высказали свои предположения об итогах:

1)Первое место займет китай,а украина будет третьей.

2)украина будет последней,а германия предпоследней.

3)германия точно будет четвертой,а первое место китай.

4)россия будет первой,а италия второй.

5)Нет,Италия будет пятой,а победит германия.

По окончании соревнований выяснилось,что каждый эксперт был прав только в одном утверждении.Какие места в соревновании заняли участники?

решите,составив логическую модель.

10-11 класс информатика ответов 1

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