Чтобы изготовить каркас прямоугольного параллелепипеда, длина которого x см, ширина – y см, а высота в два раза больше, чем сумма длины и ширины, необходимо см проволоки.
Длина проволоки, при x = 1,5; y = 2, равна
4 года назад
Предмет: Геометрия, автор: 456085
ПОМОГИТЕ ПОЖАЛУЙСТА ДАЮ 50 баллов
4 года назад
Предмет: Русский язык, автор: sergeq7840
197. Орфографический и пунктуационный практикум.
Я помню отлич(?)но мои первые де..ские полёты во сне.
Тогда мне ничего (не)стоило одним каким-то внутренним,
неп..р..даваемым усил..ем пот..рять весь свой вес о..делит(?)ся
от земли плавно поднят(?)ся к высок..му пот..лку и леч(?)
там в воздух.. ничком, грудью и лиц..м вни.. . Помню, люди,
ст..явшие на земле, всё ст..рались д..стать меня оттуда и
г..нялись (за)мной с дли(н/нн)ыми щ..тками. Но мне было
чр..звычайно ле..ко ух..дить от преследования. Я делал ру-
Источник: sous-otvet.net
Как ФИО превратить в фамилию с инициалами
Напишите программу, которая 10 раз выводит на экран ваши имя и фамилию.
В этом примере необходимо написать программу, которая будет 10 раз выводить на экран имя и фамилию (PascalABC.NET).
Текст программы обычно состоит из 3 частей:
- заголовок;
- описание переменных;
- операторы.
После var необходимо написать служебное слово begin (начало), а в конце кода — end (конец).
Для написания программы понадобятся следующие операторы:
- write (writeln);
- read (readln);
- for to do.
Операторы write и read
Write – это оператор вывода данных на экран.
Если в коде написать write(‘Введите своё имя: ‘), то на экран выскочит срока «Введите своё имя: ».
Read – это оператор ввода с клавиатуры каких-либо данных.
В коде строка read(Name) присваивает строковой переменной Name введенное значение.
Writeln и readln – это аналог write и read с переносом курсора на новую строку.
Оператор for to do
For to do – это оператор цикла с известным числом повторений.
Например, строка for i:=1 to 10 do writeln(Name, ‘ ‘, Surname) означает, что от 1 до 10 будет осуществляться вывод на экран имени и фамилии.
В итоге получаем следующую программу
Program NameSurname;
Var i: integer;
Name, Surname: string;
Begin
Write(‘Введите своё имя: ‘);
Readln(Name);
Write(‘Введите свою фамилию: ‘);
Readln(Surname);
For i:=1 to 10 do writeln(Name, ‘ ‘, Surname);
End.
70 месяцев назад
var first_name, last_name : string; // где first_name — имя, а last_name — фамилия.
write (‘Введите свое имя: ‘);
write (‘Введите свою фамилию: ‘);
for i := 1 to 10 do writeln (first_name, ‘ ‘, last_name);
Источник: uchi.ru
Я Угадаю Твое ИМЯ За 1 Минуту
напишите программу которая 15 раз выводит на экран ваше имя и фамилию
Если без циклов тоprogram fifteen;beginwriteln(‘Имя и фамилия’);writeln(‘Имя и фамилия’);writeln(‘Имя и фамилия’);writeln(‘Имя и фамилия’);writeln(‘Имя и фамилия’);writeln(‘Имя и фамилия’);writeln(‘Имя и фамилия’);writeln(‘Имя и фамилия’);writeln(‘Имя и фамилия’);writeln(‘Имя и фамилия’);writeln(‘Имя и фамилия’);writeln(‘Имя и фамилия’);writeln(‘Имя и фамилия’);writeln(‘Имя и фамилия’);writeln(‘Имя и фамилия’);end.Если циклы уже прошлиprogram fifteen;vari:integer;beginfor i:=1 to 15 dowriteln(‘Имя и фамилия’);end.
Добавить свой ответ Ответить на вопрос
Еще вопросы
Любить —
Полюбить —
Разлюбить .
Источник: znanija.site