Там нет конкретного описания что к дочке пойдет Коля Сидоров
1. Дима дарил котенка в желтых перчатках Вике
2. 7 гладиолусов подарил Саша
3. Ульянов учитель и ездит на автобусе, Савинов журналист и ездит на такси, а Жуков сварщик и ездит на метро
Program Qwerty123777;
uses crt;
var
x,y:real;
begin
writeln('*** Alphaeus is thinking... ***');
writeln('*** OK ***');
writeln();
writeln('Программа находит значение функции y=(2x-4)/(3xx+11)');
write('Введите значение х '); readln (x);
y:=(2*x-4)/(3*x*x+11);
writeln('*** Вычисляю... ***');
writeln('y=', y:8:2); ;
end.
Паскаль ABC.net версии 3.3.5
var
n: word;
begin
write('Введите номер дня недели: ');
readln(n);
case n of
1: writeln('Понедельник');
2: writeln('Вторник');
3: writeln('Среда');
4: writeln('Четверг');
5: writeln('Пятница');
6: writeln('Суббота');
7: writeln('Воскресенье');
else writeln('Нет такого номера дня недели');
end;
end.