Помогите написать в Паскале программу диалогаНаписать в Паскале программу диалога компьютером с пользователем. (Спросить имя.Поздороваться,обращаясь
5-9 класс
|
по имени.Узнать о возрасте.Любимой книге.Любимом предмете в школе. За ранее спасибо)
program tt1;
var a,b,c,d:string;
begin
writeln('Как тебя зовут');
readln(a);
writeln('Привет ',a,' ');
writeln('Сколько тебе лет? ');
readln(b);
writeln('Какой у тебя любимый предмет в школе');
readln(c);
writeln('Какая у тебя любимоя книга');
readln(d);
end.
Другие вопросы из категории
G:если занято 456 Мб свободно 3,29 гб, емкость 3,74 гб
Помогите!
Нужно "превратить" одно слово в другое вот пры
Ночь -> День
Рота -> Полк
Бант -> Коса
Бег -> Шаг
Море -> Суша
Миг -> Век
Читайте также
похудеть.по формуле рост минус 100...
написать то легко но учитель сказал что б говорилось на сколько худеть или поправиться надо ...(( ну ни как не могу додуматься(( помогите (( вот сама написаная программа
Program Zadacha1;
Var ves, rost, optVes:integer;
Begin
write('введите массу тела');
read(ves);
write('введите рост в см');
read(rost);
optVes:=rost-100;
if ves>optVes then write('вам необходимо похудеть' );
if ves<optVes then write('вам необходимо поправиться');
if ves=optVes then write ('ваш вес оптимальный')
End.
созданной программы не менее трех тестов и проверить на них правильность работы алгоритма.
БЕЗ МАССИВА
ПОЖАЛУЙСТА
+194884839383948 К КАРМЕ ТОМУ КТОНАПИШЕТ